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DONNEZ 



LA GROSSE TETE 
A VOTRE AMSTRAD 

Avec son « kit-programmation Turbo Pascal »,Fraciel vous donne la possibilité 

d'utiliser pleinement toutes les ressources de votre AMSTRAD, 

à la manière d'un véritable ordinateur professionnel. 



TURBO PASCAL 



T&&S 



TURBO TUTOR 
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PLUS VITE, PLUS FACILE, 

LE LANGAGE QUI VOUS PERMET 

D'UTILISER A FOND 

VOTRE ORDINATEUR 

• Vitesse de compilation 

Turbo Pascal compile en mémoire et en une seul 
passe, a la vitesse d'environ 100 lignes/seconde. 

• Editeur-compilateur intégrés 

L'ensemble éditeur-compilateur réside en 
mémoire. Lorsque votre programme est entré, 
vous le compilez en tapant simplement 
sur une touche. 

Si une erreur survient à la compilation, 
l'éditeur est appelé et l'erreur retrouvée dans 
le code source. 

• Un langage toutes applications 

Toutes vos applications peuvent être écrites 
avec Turbo Pascal : gestion, enseignement, 
calculs, logiciels systèmes, jeux, graphisme, 
recherche, etc.. 



Pour vos commandes, 
renseignements et 
documentation gratuite : 
ou pou r contacter not re 
assistance téléphonique 



Turbo Tutor c'est un ensemble formation pour 
apprendre et maîtriser « sans peine » le Pascal 
et toutes les ressources de Turbo Pascal. Turbo 
Tutor s'adresse aussi bien aux débutants qu'aux 
programmeurs confirmés auxquels il explique 
les notions les plus « pointues », 
Turbo Tutor ne coûte que 400 F. 
Il comprend 1 manuel en français (200 pages) et 
1 disquette reprenant tous les exemples du livre. 
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La Société AMSTRAD France ayant décidé une baisse sur les disquettes, nous la 
répercutons sur les prochaines livraisons. 



Tous les programmes parus 
dans CPC sur une disquette 
ou sur une cassette pour ne pas 
perdre de temps à les saisir. 
L'idée n'est -elle pas bonne ? Sur 
la même disquette (ou cassette! 
seront regroupés les programmes 
parus dans deux numéros suc- 
cessifs de CPC. 
Le tarif, port compris, 1 10 F poui 
la disquette ou 85 F pour la 
sette pour les abonnées. JOIN- 
DRE IMPERATIVEMENT VOTRE 
ETIQUETTE D'ABONNE AU CHE 
QUE DE COMMANDE. 
Pour les non-abonnés, le prix est 
de 140 F (D)ou 110 F (C), 
jours port compris. 
Passez vos commandes directe 
ment aux Editions SORACOM 
Pas de contre-remboursement. 
Les programmes sont livrés tels 
que publiés dans la revue et n'onl 
subi aucune modification. A vous 
de les adapter à vos besoi 
vous le désirez. 



BON DE COMMANDE 
(valable jusqu'à épuisement des stocks) 



□ CPC DISC N° 1 - 2 

D CPC CASSETTE N° 1 - 2 

D CPC numéro 1-2-3-4 

NOM Prénom 

Adresse 

Code Postal .......... Ville 



Abonné Non-abonné 

110F 1 40 F 

85 F 110 F 

18 F 



Entourez le numéro du disque choisi ou de la revue. 
Frais de port : 6,50 F pour un ou deux numéros de CPC. 
Franco pour CPC DISC et CASSETTES. 

Ci-joint, chèque bancaire ou postal de F. 
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ABONNEZ-' 



nous venons de le faire 



S ABONNER, C'EST : 

— recevoir la revue tranquillement à domicile, 

— bénéficier de prix avantageux par souscripti 
par mailing en octobre (gain : 45 francs !|, 

— bénéficier de prix sur les disquettes ei maintenan 

— recevoir l'auto-collant CPC, 

— bénéficier de notre aide dans de nombreux doma 

Alors, n'hésitez pas. Abonnez-vous... 



CPC, La Revue des Utilisateurs d'Amstrad 

ABONNEMENT POUR UN AN - 11 NUMÉROS : 175 F 
6 MOIS : 99 F - D'ESSAI 3 MOIS : 50 F 
Tarif avion : + 120 F 

Ci-joint un chèque (libellé à l'ordre des Editions SORACOM) 
d'un montant de francs. 



Code 
Date 



Ci-joint un chaque libellé à lord 
Retourne/ lelsl bulletinlsl au un 
Éditions SORACOM - Servie 



i de : Éditions SORACOM. 
photocopie à : 
Abonnements — Le Grand Logis — 10, Avenue du Généi 
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Le « Rainbow-Warrior » aurait été t %» - 
par une troisième équipe de militaires 1 ™ 




sont toitu 
son ckei 
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VOICI DEJA LA VERSION INFORMATIQUE 

DU "FEUILLETON DE L'ETE" 




DOSSIER G. 



DOSSIER "G 



eur Daniel Lefebvre. 
,e de "RAINBOW WARRIOR" par une équipe de nageui 
t aux services secrets français a été au coeur 
5 en raison du rôle joué par la presse dans la 



Qu'en est-il aujourd'hui de l'opinion de chacun de noua ? Qu'en est-U 
de votre opinion 7 Disons mime, de votre solution à cette première 

fois, le jeu d'aventure se trouve DANS l'actualité. Les indices abondent 
"DOSSIER G." est l'outil informatique de cette expérience inédite, le 



al à ( 



té de 



; de do[ 



. Ne subisseï plus l'i 

i dernière'est une possibilité supplémentaire de "DOSSIER G.". Là 
: pas le moindre de ses charmes. 



Vaut le nouveau catalogue. COBStA SOFT plat, de 
50 nouveauté* ! 100 loglcielt conviant toute* 
te.i applLzationA de la mLa.o-inio'iaatijiue 
{amiÀJLale. 

Foui iece.iioiA le catalogue, tenvoyez-noui 
le bon ci-contie en layant la demande de 
piogiaime et en ptéeXiant "catalogue". 
Joignez 2 tiinbiei à. 2.20 i*.&. En cai d'achat 
de "VOSSIER G" voui leceviez le catalogue 
automattq item ent . 



Veuillez me faire parvenir "DOSSIER G" poi 

marque de l'ordinateur : 

cassette - disquette (rayer la mention inutile) 



^ 



Code postal Ville 



par chèque (rajouter 10 Ers 

FBS 

invoyer à COBRA SOFT BP 155 Chalon a/S Cedex 
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21, ma Alban 1*' 

17000 LA ROCHELLE 

Tél.: 46.41.80.68. 
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LE SPECIALISTE 
AMSTRAD à NANTES 

464-664 
6128-8256 

périphériques 

+ de 100 logiciels 

disquettes, cassettes 

semi-pro ou particuliers 

9, rue Urvoy de St. Bedan 
44000 NANTES 
Tél.: 40.69.03.58 
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Revendeur qualifié 
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Point pilote 

nouveautés, softs 

et périphériques 

A partir du 1 ar septembre 

96, Av. Alfred Maës 

62300 LENS 
Tél.: (21) 28.72.44 
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Me voici dans tes mains. Je te sens me tenir avec fébri- 
lité. C'est long un mois, penses-tu. Alors, je te plais avec 
mon numéro 5 7 Tu vois, dans ce numéro, il y a de nou- 
veaux programmes. 

A propos de programmes, sais-tu que, pour ton plaisir, 
de nombreux amateurs et professionnels travaillent des 
semaines, voire des mois pour te livrer leurs travaux ? 
Sais-tu que le logiciel que tu achètes est protégé par des 
droits et des lois et que de faire une copie pour la vendre 
est un vol ? 
Un vol 7 

Non, plusieurs vols ! 

Un vol vis-à-vis du revendeur. Un vol vis-à-vis du fabri- 
cant qui investit pour te mettre ce produit dans les mains. 
Mais aussi un vol moral, tout aussi grave, vis-à-vis des 
auteurs et de leur œuvre. 

Aussi, mes parents (tu sais, le rédacteur en chef et le 
directeur) avaient un choix à faire. Soit contrôler mes peti- 
tes annonces et les censurer, soit les laisser passer afin 
de faire prendre le pirate en flagrant délit de vol. 
Pour l'Instant, mes parents ne m'ont pas dit ce qu'ils pan- 
sent. En fait, le mieux, c'est de cesser le piratage. 
Lis-mol bien, et si tu as le temps, écris-mois I 



A NOS LECTEURS 

Quelques lecteurs viennent de 
nous faire part de leurs problèmes 
avec certains revendeurs, parti- 
culièrement les grandes surfaces. 
Pour gagner du temps et aussi 
pour pouvoir agir avec efficacité, 
merci de joindre la photocopie de 
la facture. 
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coupon à Joindra 

à toute 
correspondance 



LE CATAMSTR AD 

C'EST QUOI! 



l> logiciels utilitaires 
[> logiciels de jeux 
Ç> logiciels éducatifs 
[> accessoires 
i> interfaces 
l> imprimantes 
[> livres 
C> — 



C'est le C AT Alogue d'aMSTRAD 

enfin disponible. 



^L IMMIA Vente Informations Services Micro-Ordinaieure 
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est dans les salons de l'hô- 
Ftel Novotel de Londres, 
situé à Hammersmith, soit à une 
dizaine de kilomètres à l'ouest 
du centre-ville, que s'est tenu 
durant le week-end du 5 au 6 
octobre, le premier Amstrad 
Computer Show. Organisé par 
Oatabase Publications, éditeur de 
notre confrère Computing with 
the AMSTRAD, ce salon regrou- 
pait toutes les compagnies britan- 
niques qui, de près ou de loin, 
commercialisent des produits 
destinés aux utilisateurs d'ordina- 
teurs AMSTRAD. La rédaction de 
CPC avait effectué le voyage 
pour vous relater l'événement, et 
c'est, guidés par l'organisateur 
M. Derek MEAKIN lui-môme, que 
nous avons eu le privilège de visi- 
ter les quelque 80 stands de l'ex- 
position. 

A tout seigneur tout honneur ! 
Nous avons demandé à voir en 
tout premier lieu le stand du 
constructeur. Malheureusement, 
si ses ordinateurs étaient omni- 
présents, celui-ci brillait par son 
absence et tout au plus, un repré- 
sentant du staff d'Alan SUGAR 
semblait s'ennuyer sur le stand 
du magazine de la marque : Ams- 
trad Computer User. Bref, l'évé- 
nement semblait peu propice à 
l'annonce de nouveautés chez 
AMSTRAD ! Nous avons quand 
môme posé la question de savoir 
si l'on pouvait espérer dans un 
proche avenir la sortie d'un nou- 
veau modèle (16 bits, portable ? 
— il est permis de rêver !). Il nous 
a été répondu par un laconique : 
"Pas de nouvelle machine cette 
semaine... " Comme quoi, on 



peut avoir l'air de s'ennuyer et 
conserver un flegme et un 
humour typiquement britannique. 
La grande nouveauté, c'est chez 
NORTHERN COMPUTERS qu'il 
fallait aller la découvrir : un réseau 
local avec disque dur de 10 
méga-octets pour AMSTRAD 
que nous décrirons dans le pro- 
chain numéro. 

L'autre nouveauté dont tout le 
monde parlait, était la souris 
AMX (rien à voir avec les chars 
d'assaut) de ADVANCED 
MEMORY SYSTEMS. De nom- 
breux visiteurs profitaient du prix 
expo de 69,99 livres pour repar- 
tir avec la bête sous le bras. Il 
était d'ailleurs quasiment impos- 
sible d'approcher le stand, et 
nous avons dû attendre le diman- 
che matin, avant l'ouverture de 
l'exposition au public, pour assis- 
ter a une démonstration en toute 
tranquîlité et faire quelques pho- 
tos. La souris, dotée de 3 pous- 
soirs, se connecte à la prise joys- 



Marcel LE JEUNE 



tick et est livrée avec un logiciel 
de dessin à icônes et menus 
déroulants ainsi qu'un manuel 
permettant de l'utiliser dans ses 
propres programmes. 
Chez THE ELECTRIC STUDIO, la 
vedette était ESP, un light-pen 
extrêmement précis et sensible, 
vendu 19,95 livres avec un logi- 
ciel de dessin très performant. 
Tout y est : zoom, effets de 
miroirs, dessin en 3D, etc. Ega- 
lement chez le même éditeur, 
AMSPRITE qui, comme son nom 
l'indique, permet de générer et de 
gérer jusqu'à 40 lutins sur 
l'écran. 

Pour en finir avec les logiciels gra- 
phiques, il ne fallait pas manquer 
chez EG COMPUTER GRAPHICS 
le fabuleux logiciel de dessin 
industriel Draughtsman, idéal 
pour le dessin mécanique et élec- 
tronique. 




Nous aurons l'occasion de vous 
présenter tous ces produits plus 
en détail dans un prochain banc 
d'essai. 

Du côté des utilitaires, la vedette 
était PRIDE UTILITIES qui ajoute 
à sa gamme désormais célèbre 
par Syclone, Tomcat, un nou- 
veau programme sur disquette : 
OODJOB. On y trouve pêle-mêle 
un copieur, un utilitaire permet- 
tant de cacher des noms de 
fichiers dans un catalogue, un 
autre permettant de réparer un 
secteur endommagé et bien d'au- 
tres programmes astucieux qui 
deviendront rapidement un must 
pour tout utilisateur d'AMSTRAD 
avec lecteur de disque. 
Comme nous l'avons vu, le hard 
n'était pas délaissé, et DK'TRO- 
NICS présentait une gamme de 
modules enfichables. Un bloc de 
64 k ram, accompagné d'un 
logiciel ajoutant 1 2 commandes 
au Basic, est destiné aux utilisa- 
teurs de 464 et 664. Ils peuvent 
ainsi obtenir la même capacité de 
mémoire que le 6128. Le Silicon 
Disc est un disque virtuel de 
256 k qui se connecte indiffé- 
remment à n'importe quel modèle 
AMSTRAD, pourvu qu'il soit doté 
d'une unité de disques. Il procure 
un gain de temps énorme en évi- 
tant les fréquents accès au dis- 
que en cours de travail et peut 
s'utiliser à partir du Basic ou sous 
CP/M. Neil RAWLINSON, direc- 
teur de DK'TRONICS, nous a 
déclaré avoir entamé des négo- 
ciations avec Denis TAIEB, ex- 
importateur de la gamme ORIC, 
pour la distribution en France de 
ces modules. 





Les logiciels professionnels 
deviennent de plus en plus nom- 
breux sur AMSTRAD, prouvant 
l'intérêt suscité par ces machines 
auprès des petites entreprises. 
Database Software propose pour 
9,95 livres son logiciel Mini 
Office qui combine un traitement 
de texte, un gestionnaire de 
fichiers, un tableur et un utilitaire 
graphique. Evidemment, ce n'est 
pas Framework, mais cherchez 
mieux pour ce prix I D'ailleurs, 
plus de 25 000 exemplaires du 
programme ont déjà été vendus. 

De son côté, GEMINI SERIOUS 
SOFTWARE présentait Database 
accompagné de Report Genera- 
tor qui formatte les données de 
vos fichiers à votre convenance 
sur l'imprimante. Egalement chez 
le même éditeur, Home Accounts 
qui est un programme de gestion 
de budget familial sur cassette ou 
sur disque. Tous ces programme 
doivent être prochainement tra- 
duits en français. 
Bien évidemment, tous les jeux 
d'action étaient présents et de 
nombreux stands ressemblaient 
aux salles d'arcade de Las Vegas. 
Que de monde, que de bruit, et 
pourtant rien de transcendant. 
ALLIGATA avait même encastré 
ses AMSTRAD dans des meubles 
du plus bel effet, calqués sur les 
machines à sous des cafés et, 
comme il n'y avait pas de mon 



nayeurs, vous imaginez la bous- 
culade... 

AMSOFT présentait 3D Grand 
Prix, course de voitures en 3D, 
analogue au célèbre Pôle Position 
d'Atari et chez MYRDDIN SOFT- 
WARE, on pouvait voir à côté de 
leur simulateur de vol, le pro- 
totype de Zania, jeu d'aventure 
entièrement et uniquement gra- 
phique de 250 kilo-octets ; 
superbe l Le problème de la lan- 
gue est ainsi résolu, et Myrddin 
espère commercialiser rapide- 
ment ce programme dans toute 
l'Europe. 

Tous les éditeurs britanniques 
sont d'ailleurs conscients de l'ex- 
tension des ventes d'ordinateurs 
AMSTRAD sur le continent et se 
déclarent prêts à traduire leurs 
logiciels et notices et recherchent 
activement des distributeurs à 
l'étranger. 

Le show ouvrait ses portes au 
public à partir de 9 heures le 
dimanche matin et déjà à 8 h 30, 
les visiteurs se pressaient sur le 
parvis de l'hôtel, laissant présa- 
ger une affluence encore plus 
importante que la veille. Mais il 
nous fallait déjà rentrer en 
France... Il nous reste à saluer 
l'heureuse initiative de l'organisa- 
teur de cette exposition et à lui 
souhaiter un aussi franc succès 
pour sa deuxième édition. 
Rendez-vous en 1 986, Monsieur 
Derek MEAKIN I 
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'LE SURVIVANT" 
PSS ERE Informatique 
Support cassette 
Tous AMSTRAD. 



"Le Survivant" est le premier fruit de l'as- 
sociation franco-anglaise entre ERE et PSS 
qui consiste à traduire et à distribuer les meil- 
leurs softs de le marque étrangère (ERE 
commercialisera ainsi toute la gamme des 
" Wargame»"). 

Ce logiciel est un cocktail bien dosa entre 
stratégie et action lé peu prés 60 % d'arcade 
et40% de réfiexionl, et présente un thème 
original. Vous 6tes le dernier survivant d'une 
race hélas aujourd'hui éteinte, et vous devez 
absolument retrouver les 64 parties du code 
génétique qui permettre de ressusciter votre 
peuple. Vous disposez d'un petit vaisseau en 
forme de bulle, assez difficile à manier du fait 
d'une inertie importante. Vous avez aussi la 
possibilité de sortir de votre bulle pour récu- 
pérer les différents objets Qui vous seront uti- 
les dans votre Quflte. 

Chaque zone de jeu comporte 4 pièces avec 
une méchante bestiole dans chaque. On y 
trouve aussi une clé. un coffre contenant un 
morceau du code génétique, un revitaliseur 
qui vous remettra sur pieds, et surtout une 
plante étrange, qui vous permettra de proje 
ter len diagonale uniquement : il faut louer 
avec les rebonds I) des bouffées de gaz 
paralysant. Une fois les créatures immobili- 
sées, il faudra rapidement remonter dans la 
bulle et venir "cueillir" le monstre. Une fais 



S'ils sont quelque part 
c'est chez 

AMSTRAD 6128 
AMSTRAD 8256 

at les derniers logiciels. 



4, rue André Chénier 
78000 VERSAILLES 
Tél.: 30.21.75.01. 
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et 4 salleB par zone, ce. a tait... eh oui. 256 
pièces a visiter I). Le fait de toucher une crée 
ture vivante ou d'être touché(e) par vos pro- 
pres tirs, vous fait perdre de l'énergie. Vous 
pouvez à tout instant "geler" le jeu et faire 
apparaître un tableau récapitulant votre état, 
les pbjets et les monstres transportés, le 
temps depuis le début du jeu et les morceaux 
du code récupérés. 

Le Survivant est un jeu difficile, dont l'inté- 
rêt et l'originalité sont encore accrus de per 
l'utilisation de deux "personnages" diffé- 
rents : le Survivent seul et le Survivant dens 
son vaisseau-bulle, qui sont difficiles è bien 
diriger. Le graphisme général est soigné, et 
l'animation des monstres et du personnage 
est très bien faite, La sonorisation du jeu 
aurait pu, par contre, être un peu eméliorée. 
Les décors sont variés (ils changent à cha- 

On peut jouer au "Survivant" avec le joystick 
ou au davier, dont les touches sont d'ailleurs 
redéfiniasables (enfin un programme qui 
prend en compte l'ergonomie II. De plue, la 
cassette comporte une version AMSTRAD et 
une version SPECTRUM. 
Une certeine habitude est nécessaire pour 
jouer au "Survivant" (les premières parties 
ne durent que quelques secondes II. mais ce 
jeu ne déparera pas votre ludothèque. On 
espère que les prochaines "traductions" 
ci' ERE seront aussi bonnes. 
Graphisme = 4, Son = 2, Animation = 4, 
lnlér« = 3. Originalité = 4. 



"LES MILLE-BORNES" 
FREE GAME BLOT 
Jeu de table 
Support cassette 
Toue AMSTRAD 

Tout le monde a certeinement en mémoire ce 
jeu célèbre, qui se vend toujours è 1 00 000 
exempleires. Le but eat de réelieer 5000 
points par manches successives eu cours 
desquelles on doit atteindre exectement 
700 kilomètres. Jeu de cartes où se mêlent 
hasard et stratégie, le Mi Ile- Borne s proposé 
sur AMSTRAD vous opposera à l'ordinateur. 
Expliquer le règle du jeu en quelques ligne 
n'est pas chose aisée : il existe des certes 
'étapes" (distance parcourue), des certes 
'attaques" {permettant de ralentir, voire blo- 
quer l'adversaire), des cartes "parades" 
parer eux attaques) et ries cartes "bot- 
(pour immuniser le joueur qui les pos- 
lède pendant toute une manchel. 

rendu des cartes è l'écran eat tout à fait 
:orrect, et le jeu reste utilisable que le moni- 
teur soit couleur ou monochrome. 

joueur ne gagnera paa à toue lea coupa car 
ordinateur saura user de stratégie et porter 
'bottes" et "coupa fourrés' é bon eaclem. 
Pour tous ceux qui aiment les jeux "de 
société" qui en ont asaez de ttaquer l'enva- 
hisseur, le MILLE BORNES offrira d'agréables 
moments de détente. Par son originalité et 
sa qualité de réalisation, ce jeu se distingue 
un peu de ce qui existe sur AMSTRAD. 

Graphisme : 3, Son : 2. Animation : 2, Inté- 
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PLANETE BASE" 
LORICIELS 
Educatif 

Support c a» «et le 
Tout CPC, moniteur couleur nécessaire 

il y s encore assez peu de logiciels destinés 
aux enfants, ayant un but éducatif, et qui ne 
soient pas rébarbatifs. Celui-ci, après quel- 
ques tests sur des élèves de CEI à CM1, 
nous a paru digne d'être cité. Il permet à 
l'élève de se familiariser, en s'amuasnt, avec 
la notion de bases at de numération. 
Le héros du jeu s'appelle PEPO. Il doit nour- 
rir son ami NUMERU5, sorte de Casimir (pour 
les connaisseurs), au moyen da pommes rou- 
ges. Pour obtenir cas pommes rouges, PEPO 
doit cueillir, et échanger chez le marchand, 
des pommes bleues, jaunes et blanches car 
les rouges ne poussent pas sur les arbres de 
sa pian été. 

C'est au moment de la cueillette, et surtout 
de l'échange, que va intervenir la notion de 

Coloré at d'une présentation agréable (PEPO, 
le petit garçon, est animé comme un person- 
nage de dessin... animé), ce logiciel pe 
t'a aux parents d'illustrer les leçons ci 
pondantes. A la maison ou è l'école, si celle-ci 
n'est pes envahie de T07 ou semblables, 
PLANETE BASE trouvera une place aux côtés 
de l'ordinateur. 

: 3, Inté- 




' FONCTIONS" 
MCRO-C 

LHJttWre/ Didacticiel 
100 FF disette, 130 FF disquette 
Tout CPC 

Ecrit pat un professeur de mathématiques, 
FONCTIONS est un des rares logiciels sus- 
ceptible* d'être utilisés è l'école et à la mai- 
son. Il h compote de deux parties : les cour- 
bes de fonction et les intégrales. Utilisable 
de la seconde i la terminale, il permettra 
l'étude graphique des fonctions les plus 
complexe*, mettant au grand jour les notions 
de continuité ou dé dérivabilité. 
Pour les intégrales la méthode retenue est 
"méthode de* rectangles". Dans le 



Le calcul de la valeur des intégrales et leur 
représentation graphique sont prévus. 
La réalisation est très correcte avec uns uti- 
lisation sobre des couleurs et du son. La ligne 
contenant la fonction à étudier est éditée 
automatiquement, permettant à l'utilisateur 
sa modification aisée. 

D'un prix très raisonnable, le logiciel sera d'un 
grand secours aux étudiants désireux de 
comprendre, par l'image, la théorie apprise 



rêt : 3, Originalité : 3. 



"ORPHEE (VOYAGE AUX ENFERS!" 

LORICIELS 

Aventure 

Support disguette 

Pour tous le* CPC 

Vous connaissez LORICIELS, chez eux, on ne 
fait pas les choses à moitié... OrtPHEE est 
une grande fresque, occupant plus d'une face 
de la disquette (l'autre partie de l'autre face 
étant réservée à une démonstration), vous 
invitant a un voyage aux enfers. Rien de bien 
engageant, penserez-vous... Le thème est 
spécial, en effet, puisque vous descendez en 
enfer, suite è un accident de voiture, pour 
décider si votre corps vivra ou non. On aime- 
rait pouvoir être réellement maître de ce genre 
de décision I 

Le texte est illustré par des images très soi- 
gnées, d'où l'humour n'est pas toujours 
absent. Les effets sonores qui viennent ponc- 
e AMS- 



TRAD 



quelque; 



naître malgré le petit diamètre du haut-parleur 
interne. Ajoutez fl cela des illustrations musi- 
cales et vous aurez une idée de ce tableau 
que nous avons tenté de "brosser" en quel- 
ques lignes. Pour le reste, nous vous laissons 
découvrir : nul doute que les passionnés de 
jeu d'aventure n'y trouvent quelques heures 

i : 2. Inté- 



Graphisme : 4, Son : 4, 
rèl : 3, Originalité : 3. 




cM est inclus un -apoei de c 



a méthode. 



99 FF *ur cassette. 139 FF sur dlaquatte 
Pour 464 et 664 

Avec SUPERSONIC, ça va faire du bruit... 
Des "bangs", des "psss" ou ce que vous 
voudrez. SUPERSONIC est un utilitaire de 
création sonore, véritable éditeur de sons en 
tous genres. Le logiciel est conçu pour vous 




assister dans l'élaboration des sons les plus 
divers. Il permet d'agir sur tous les paramè- 
tres de l'instruction SOUND de manière fort 
originale. Modification de la période, durée, 
choix des enveloppes volume et tonalité. 
Dans ces deux cas, on obtient la représen- 
tation graphique de l'enveloppe, ce qui per- 
met de l'affiner pour qu'elle soit aussi pré- 
cise qu'on le désire. 

Les sons et enveloppes créés peuvent être 
sauvegardés sur cassette. Le logiciel possède 
une fonction, accessible depuis le menu (très 
original, par ailleurs, car présenté comme un 
organigramme!, permettant d'obtenir direc- 
tement les lignes de Basic correspondantes 
et, éventuellement, leur édition sur impri- 
mante. Les sons peuvent être lestés immé- 
diatement, on peut "reboucler" certains 
paramètres, bref, c'est un utilitaire qui fera 
l'affaire de tous les créateurs à la recherche 
d'effets sonores un peu spéciaux. A possé- 
:! que pour apprendre è jouer 
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A LA VITRINE DU 




Les séria» font recette, car troll des 
ouvrage» qua noua avona lu» pour voua 
ca mot» ci. ont daa antécédent* sur 
d'autre» ordinateurs familiaux. 
SI cette pratiqua aat avantageuse pour l'édl- 
taur, alla pourrait devenir rapidement dange- 
rauaa pour la lecteur car laa llvraa rlaquant 
da na plu» tenir compta daa spécificité» d'une 
machina donnée. C'est la caa da* "Premier» 



"AMSTRAD, PREMIER PROGRAMMES" 
SYBEX 
Rodnay ZAKS 
98 FF 

Rodnay ZAKS est très connu dans le monc 
de le micro-informatique. Docteur en info 
matique, il enseigne la micro et est l'autei 
de nombreuses conférences et livres sur 



AMSTRAD 







[ grflce aux qualités de pédagogue 
de l'auteur que nous pourrons dire que ce 
livre reste intéressant, bien qu'il ne considère 
pas les particularités de l' AMSTRAD. 
Très clair, abondamment et agréablement 
illustré, accessible au plus jeune des débu- 
tants, il permet de comprendre les notions de 
base qu'il est indispensable de posséder pour 
arriver à l'écriture d'un premier programme. 
Définition de l'algorithme, établissement d'un 
organigramme, tests sur le pépier, sont 
autant d'étapes par lesquelles il faut passer 
avant de rédiger un programme. Si vous sui- 
ve;, à la lettre, les conseils de l'auteur, vous 
serez sur le bon chemin. 
Quelques exercices élémentaires sont propo- 
sés : le débutant, auquel s'adresse ce livre, 
aura tout intérêt à ne pas les négliger. 
En dernière partie, un glossaire traduit les ter- 
mes couramment rencontrés dans le jargon 
informatique. Première étape sur la route de 
la programmation, cette lecture devra être 
suivie par celle d'ouvrages plus spécifiques 
pour qui voudra tirer un meilleur parti du Basic 
de son AMSTRAD. 



"MUSIQUE SUR AMSTRAD" 

EDIMICRO 

lan WAUGH 

14BFF 

Traduit de l'anglais, l'auteur lan WAUGH est 
musicien professionnel et auteur du même 
titra sur d'autres ordinateurs. S'il est un livre 
que doit posséder l'utilisateur d'AMSTRAD 
désireux d'utiliser aux mieux les possibilités 
musicales da la machine, c'est bien celui-ci. 
Le manuel utilisateur des CPC est avare en 
informations concernant la génération des 
sons, et reste très théorique, voire herméti- 
que, sur ce sujet. L'ouvrage que nous avons 
lu pour vous est tout le contraire. Il est bien 
entendu qu'un non -musicien ne deviendra 
pas un prodige après l'avoir lu, par contre il 
comprendra comment est produit un son, 
quelles sont ses caractéristiques ; fréquence. 



volume, enveloppe n'auront plus de secrets 
pour le lecteur 

Da même, un chapitre consacré è la musique 
lui fera découvrir ce qu'est une gamme, une 
mesure, une harmonie ou un accord. Les 
commandas SOUND, ENT, ENV sont ensuite 
détaillées. A' chaque fois, l'auteur propose à 
sas lecteurs un petit exemple en Basic per- 
mettant d'allier théorie et pratique. 
Vous apprendrez è bruiter et è composer sans 
avoir l'impression de peiner : tout est claire- 
ment expliqué. 

Si votre AMSTRAD était désespérément 
muet et ne savait que produira des sons 
gala ctico-débi les, les 240 pages de cet 
ouvrage vont vous le présenter sous de nou- 
veaux aspects. 



MUSIQUE SUR AMSTRAD 
I CPC 464 ET 664 I 





-CLEFS POUR AMSTRAD" 



Avac sa traditionnelle reliure spirale, cet 
ouvrage fait partie d'une série entamée avec 
d'autres ordinateurs. C'est une "compila- 
tion" de toutes les informations qui ont été 
publiées sur r AMSTRAD. On n'y trouve pas 
les détails, développés dans d'autres livres, 
mais l'essentiel y est résumé. 
Les 60 premières pages reprennent la des- 
cription (résumée) du Basic de r AMSTRAD. 
Une section de 25 pages est consacrée bu 




langage machine avec le détail dea mnémo- 
niques assembleur Z80 La logiciel interne : 
routines utiles avec point d'entrée, conditions 
de sortie et fonctions réalisées, les vecteurs 
d'appel et d'indirection, les variables 
système, les adresses des mots-clés, sont 
quelques unes des informations données 
dans la troisième section. 
Une description des principaux circuits Inté- 
grés (891 2, 8266, 6845 et Gste Array), ainsi 
que le détail des connexions complètent l'ou- 
vrage. Enfin, quelques trucs et astuces (trop 
peu nombreux) concluent ce livre. 
Si la place manque sur votre bureau, S côté 
de l' AMSTRAD, ou que votre budget a été 
sérieusement entamé par l'achat de l'ordina- 
teur, vous aurez peut-être quelques difficul- 
tés à vous constituer une bibliothèque 
"système" intéressante. "Clefs pour AMS- 
TRAD" vous paraîtra alors Indispensable, 
pour peu que vous ayei envie de mieux 
connaître le système d'exploitation de votre 
CPC. Ecrit pour le 464, il aérait souhaitable 
que les prochaines éditions soient complé- 
tées svec les particularités des 664 et 6128, 
mais l'essentiel reste décrit. 

"LE LIVRE DU LECTEUR DE DISQUETTE 
MICRO APPLICATION 
BRÛCKMANN at SCHIEB 
148 FF 

Traduit de l'allemand, comme le reste de la 
collection, la seul reproche qu'on puisse fsire 
è cet ouvrage est justement lié à des problè- 
mes de traduction. Pour le reste, on peut dire 
qu'il s'avérera très vite Indispensable aux uti- 
lisateurs d'AMSTRAD evec disquette. En 
prés da 400 pages, vous obtiendrez une foule 
d'informations essentielles sur le hsrd et le 
système d'exploitation 
Le contrôleur FDC 765 est détaillé, registre 



par registre, et vous découvrirez les secrets 
du formatage et de l' écriture-lecture sur dis- 
que. Structure du catalogue, routines les plus 
utiles, listing commenté de la ROM contenant 
le DOS, ainsi que quelques routines complè- 
tent ce livre, véritable mine d'informations. 
Un schéma électronique du contrôleur «st 

Sien structuré, ce livre est, sens nul doute, 
l'outil indispensable au programmeur désJ- 
reux d'exploiter au mieux son lecteur de dis- 
quettes. A commander au plus vite si vous 
êtes de ceux-là. 



BRÙCKMANN-SCHIEI 
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LE VRAI PRIX 

DES ORDINATEURS 

Notre confrère HEBDOGICIEL 
vient d'attribuer aux CPC 664 et 
CPC 6128 l'Oscar du meilleur 
rapport qualité-prix des ordina- 
teurs individuels. 



VOUS AVEZ 

DIT COMPATIBLE ? 

ERE INFORMATIQUE vient de 
ressortir trois de ses best-sellers 
en version compatible CPC 664. 
Il s'agit de Amélie Minuit, Maca- 
dam Bumper et Mission Delta. 



AMSTRAD ACTION 

Une nouvelle revue mensuelle 
pour les utilisateurs d'AMSTRAD 
vient de voir le jour en Angleterre. 
Il s'agit de AMSTRAD ACTION, 
consacrée presque exclusive- 
ment aux bancs d'essais de logi- 
ciels en tous genres, mais avec 
un prédilection pour les jeux. Le 
numéro 2 de Novembre est paru. 




AUTO 

COLLANT 

CONTRE 

3 TIMBRES 

A 2,10 F 



CALAMITES 

Dans son article "Soirée Mon- 
daine" du n° 4 de CPC, Eddy 
DUTERTRE a indiqué que le 
PCW 8256 était en QWERTY. 
Or, cet appareil avait le clavier 
AZERTY. Il faut dire que les 
essais furent effectués après 
moultes passages au buffet ; 
alors, le lecteur nous excusera I 
Par ailleurs, ce n'était pas la 
DMP 2000 qui était présentée I 
Dur, dur, la soirée 1 




EXCLUSIVITE VISMO 

Comptabilité générale S / K7 
Comptabilité générale S / DISK 
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DELTA 


NORSOFT 


MACADAM BUMPER 


TYRANN 


MILLIONNAIRE 


AQUAD 


MICRO SAPIENS 


PLAYBOX 


AMELIE minuit 


COBRA 


COMPILATEUR 


MTREGRDE VITESSE 


MANAGER 


PINBALL 


CHIROLOGIE 


NIGHT BOOSTER 


3DMEGAC0DE 


STRESS 


GUTTOR 



LORICIELS 

RALLYE II 
EMPIRE 
3DFIGHT 
MYSTKIKEKANKOI 
PLANETE BASE 



POWER SOFT 

EASYCALC 
EASY FILE 
EASY BANK 
EASYGRAPH 



LIVRES 



ACCESSOIRES ET PERIPHERIQUES 

IMPRIMANTE DMP1 

SYNTHETISEUR VOCAL 

CRAYON OPTIQUE 

CORDON MAGNETO / 664 

CABLE IMPRIMANTE 

RALLONGE ALIMENTATION ET VIDEO 

LECTEUR DISQUE DD1 

LECTEUR DISQUE FD1 

ADAPTATEUR PERITEL 



Super jeux AMSTRAD (PSI) 

AMSTRAD en famille 

EXPLOITEZ VOTRE AMSTRAD 
fourni avec la K7 programmes : 138,00 FF 
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COMMANDEZ PAR TÉLÉPHONE avec 
votre "CARTE BLEUE", votre "EUROCARD" 
votre "CARTE CRÉDIT AGRICOLE" 
•99; 08 83 54 et 99/ OB B3 17 
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D santé, prouvant 
genre de logiciels, nous avons décida 
d'effectuer un test global et simultané des 
différents simulateurs de vol sur AMSTRAD 

Disons-le tout de suite, aucun n'arrive à I; 
cheville du célèbre "FLIGHT SIMULATOR II' 
de SUBLOGIC disponible sur COMMODORE. 
APPLE, IBM et ATARI. Ceci esl hélas regret 
table et nous espérons, sans tr 
que SUBLOGIC comblera cette lacune. 
Mis è part "MISSION DELTA" d'ERE INFOR 
MATIQUE, seul français du lot, tous les loi 
ciels testés viennent d'Outre-Manche et sa 
importés en France, entre autres, par GU 



usa 



Conseil «t S.A.V 

d« la région Contre 

pour AMSTRAD FRANCS 

Ne soyez pas 

consommateur ; venez 

bénéficier de nos 20 ans 

d'expérience en informatique 



2 S, 



■ do la Mouchotloro 



4S140 St. jMrMNt-la-fttNHi* 
TH.I (SR| 4I.11.H 
ou (16) 72.22.» 



LEMOT INTERNATIONA 
annonceur de CPC, 
Chacun d'entre eux présen 



SOFTWARE, 

! une particula- 
it-être. FLIGHT 




Coni 



s les Red Arrows ? 
atique de la Roval P 
3tre PAF {Patrouille 



un appareil appelé HAWKMK1, et c'est si 

Vous venez d'être affecté à la patrouille, c 
qui suppose déjà que vous soye* un bo 

tuer, par la suite, an entraînement avec I 
reste de la patrouille. Quand tout cela ser 
bien au point, vous pourrez participer à u 
nieeiimi où aucune faute n'esl permise. 



n solo 



■t ,Mml 



e bord est p- 

votre place d'équipiei 
moniteur pour plusi< 



,|-,i;rur -,!i:. 

patrouilh 






e- aéronef s. 



LeHAHRIER. 

il pas Isnas d'aéronautique 

il entendu parler lors de la "Guerre 
des Maloumes" et si vraiment vous ignorez 
tout de '..«i avion, sachez qu'il s'agit d'un 
appareil a décollage et atterrissage vertical 
(le seul réellement opèrationnell, en service 
dans la Hovel Navy ISea Harrierl et dans la 
Royal Air Force. 

Vous allez piloter le JUMP JET et. si vous 
«tes doué, gravir les échelons de la hiérarchie 

brio. Il vous faudra décoller du p 
intercepter et détruire les avi 
avant qu'ils ne vous abattent ... el revenir sur 

Un AOAV I Avion à Décollage et Atterrissage 

Vertical) ne se pilote pes aussi facilement et 

qui pourra écourier sérieusement le mission I 
Votre plein n'étant pas inépuisable, vous 

niveau le plus élevé, contre les éléments 
naturels. 

Le programme vous propose plusieurs vues 
de l' extérieur, avec toujours la planche de 
bord. Les indicateurs sont "numériques", mis 
à part l'horizon artificiel et le radar. Les 
commendes disponibles sont les commandes 
classiques d'un avion plus celles des tuyè- 
res de propulsion. 

Une première vue situera votre appareil sur 
le pont, pendant le décollage, puis su-dessus 
de 300 ft (pieds), apparaissent le porte- 
aéronef et votre appareil (deux vuesl. Ceci 
est surtout utile è "l'atterri stage"... 
Au-dessus de 200 ft. vous voyez le ciel (avec 
les nuages) et la mer Icrôte des vaguesl . Lors 
de l'attaque des appareils ennemis, ceux-ci 
apparaissent et grossissent.,. A vous de les 



De même, lorsque vous voudrez reioindre le 
porte-aéronefs, cette fonction vous sere du 
plus grand secours, 

La réalisation est soignée, même si la plan- 
che de bord manque un peu de réalisme, et 
l'avion répond bien... 

Le programme est annoncé comme ' parlant 
avec un synthétiseur externe". Ne possédant 
pas cette interface, nous n'avons pu appré- 
cier la qualité de cette "option". 
Notons que le version que nous avons tes- 
tée devrait être maintenant retirée du mar- 
ché : un bug 'empêchait la sélection du 



parties : l'école de pilotage et la mission ; une 
batterie de lests pour savoir si vous avez bien 
assimilé le manuel et si vous connaissez les 
possibilité» de voire interceplaur. 
L'action sa paaae en IFR (vol aux instru- 
menta) : il n'y a donc pas de vue sur l'exté- 
rieur. Par contre, le réalisme daa situations 
a été respecté, un exemple : vous avez à 
votre disposition un émetteur -récepteur radio 
pour communiquer avec la tour et le centre 
de contrôle. Ne décollez pas sans son auto- 
La fonction "école" vous permettra de pren- 
dre votre evlon en main, sans risqua d'être 
attaqué par un autre intercapteur. Entraînez 
vous * atterrir avec l'ILS (atterrissage aux ins- 
trumental ei * utiliser correctement tous les 
instruments disponibles sur votre appareil. 
En "mission", il faudra intercepter l'ennemi 
avant qu'il ne détruise votre base, tout en 
prenant aoin d'échapper é aas misai las (vous 
découvrirez avec l'expérience, les différen- 
tes parades et l'utilisation desleurresl. Votre 
têche sera compliquée par le risque de for- 
mation d'une zone DELTA dont on sait peu 

Simulateur très complet en ce qui concerne 
les instruments disponibles, puisque même 
le parachute de freinage et le siège éjecteble 
ont été prévus, on regrettera l'absence de 
graphisme "extérieur", mais malgré tout, 
MISSION DCLTA. en étant très proche du 
scénario aéronautique réel, présente beau- 
coup d'intérêt. 



DELTA" W^ 



Seul logiciel de création française dans cette 
catégorie, MISSION DELTA vous met aux 
commandes de l'intercepteur "COBALT", un 
appareil sophistiqué sorti de l'imagination de 
l'auteur du logiciel mais néanmoins proche 
de la réalité.. 

Le manuel, livré avec le cassette, voua offre 
toute une mise en scène qui vous placera 
dans la peau du pilote. Le logiciel, écrit entiè- 
rement en Basic Ice qui explique l'absence 
d'animation graphique), est scindé en trois 




Agrémente d une muligu* du plus bel effet 

FUGHT paim 737 noua la*», hélas, su- 
notre faim Si la vua initiale an très promet 
leuse (il faut t'alignât dene l'axa de piste 
avant de décollât), le comportement de l'ap- 
pareil est aaaez décevant car beaucoup trop 
pointu : il posera certainement dea problèmes 
aux débutants. Un exemple : le maigre 
matga de manoeuvre Iota dea rentrées et sor 
lies dea voleta... 

Après le décollage, votre but sera de franchir 
une chaîne de montagnes et de vous poser 
sut l'aérodtome situé derrière Bon courage I 



Avec ce logiciel de simulation de vol, il v 
sera donné de piloter plusieurs tvpes d 
pareils, et cb an (onction du niveau cru 
au départ , Si le décor de In canine reste it 
tique, il n'en esi pas de même du comporte- 
ment des différent! aviona. 
Ecrit moitié en Basic, moitié en langage 
machine, ce simulateur n'est pas minières 
sant bien que présentent quelques défauts 
Il vous permettra d'évoluer sur une surface 
matérialisée par une girito de 1 6 ■ 1 6 carrés 
élémentaires Dans certains de ces carrés 





compte tours, variométre. indicateur d'aiti 
tude altimètre, compas, vitesse indiquer* et 
jauge de carburant Certains instruments sont 
doublé* d'un affichage numérique Votre 
position est ainsi affichée 
Au début, lea montants du pare- buse et une 
croix (aorte de collimateur) en plein centre de 
l'écran annt (lênants. Par la suite, on s'v habi 
tue... Unn touche a même été prévue, les 
débUUnll l'Apprécieront lors des entrain» 

""■"!■. .i i -in '.suite, pour revenu d'un l'un 

vient Un petit vol 7 

Commande dea gai au maximum, volets «or 

n*. on lécha les (rems Le moteur vrombit et 

* 40 noeud*, on décolle. Heniiée du ti»n et 

de» volets et c'est parti pour la promenade 

Le» '«action» de 'appareil sont un peu mol 

les mars non désagréables On peut s' entrai 

ner aux tour* de plate, visiter les lieux (sur 

vol de* point* caractéristiques! 

terrain pour l'atterrissage : moteur à 1200 

tour», volet* sortis lattention au décrochage!. 

l'approche n'en pas très facile 

Arrondi ni loucher (ti 

dé sortir le train ?), 

et un petit P*u de freins pour s'arrêter 

1 logiciel 
semble assez au "FUGHT SIMULATOR I 
Apple ou TRS 80 



_ Votre mission sera de protéger vo* ditfaren 
s basas aériennes, mais avant de devenir 
i pilote chevronné, vous aurez quelques 
| heures de vol d'entraînement t faire M 
Mirnoyant, ça ne s'improvise pas. 
la simulateur propose plusieurs m va aux et 
des types dé missions différants, allant de 
l'entraînement à l'atterri s saga, au combat 
résl. Vous ne devriez pas voua lasser de si 
tôt. 

La planche de bord est un peu futuriste et 
s'éloigne assez de celle du F 1 5, mais toutes 
In* commandes et instrumenta de navigation 
ai d'attaque sont présents Vous utiliserez 
essentiellement l'horizon artificiel k> RADAR, 
le calculateur d'interception si l'ILS pour Car 
1er listage 

L'avion réagit merveilleusement bien, ca qui 
est é signaler Tonneaux rapide* ou boucles 
et ren versements sont réalisables Attention 
aux fautas de pilotages : train ou volets sor 
lis é trop grande vitesse. loucher de rouet 
trop brutal, décrochages, tout a été pévu. 
A défaut de mettre les pieds sur le* freins 
(votre AMSTRAD ne vous le pardonnerait 
l'un doigt. Les volats sont 
éacteurs rugissent pleins poussée, 
ustion allumée : léchez les Irems. 
ule et ne demande que décoller 



leu < 

Facile 'Essayez pour voir ' Il ne se laissa pas 
faire si vous le perdez de vue. vous pou 
vez toujours regarder la carte ' 
Simulateur de vol bien réalisé, tant au point 
dn vue du graphisme (piste ou décollage et 
A l'npproche, silhouetta de l'avion annsml), 
nue de la rapidité de réaction de l'appareil, 
FIGHTER PILOT va vous taire découvrir (es 
plaisirs du vol supersonique et du combat 
aérien Heureusement que le programma na 
Pénalise pas les accélération» trop mtensi 
ve» ' En ce sens, il est certainement la me-l 
leur simulateur qu il nous a été donné de les 
1er »ui AMSTRAD. 



io pyramide, des terrains 
de formes géométriques, et même la marque 
"AMSTRAO" L'altitude devra être soigneu- 
sement choisie (onlro 300 et 500 piedsl pour 
que ces "marques nu sol" apparaissent de 
maniera agréable. 

Deux aérodromes sont disponibles : vous 
pourrez vous y poser, redécoller, faire des 
TOUCH AND GO ". atc Le graphisme est 
de type vectoriel mai* l'animation est, hélas, 
saccadée au rythme approximatif d'une 
image par seconde 

La plancha de bord intègre différents instru- 
ments et indicateur» volets, train, freins. 




Le FI 6 Eagla est un merveilleux avion de 
combat Mêliez votre casque et votre 
combinaison de vol car c'est sur cette 
machine, capable de voler à deux feus la 
vitesse du son. que vous allez décollet 
intercepte' et tenter d'abattre 
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nouvelles commandes à votre CPC 46416» 

mante AMSTRAD DMP1 [AMDUMPI et noi 
imprimantes compatibles ESPSON (EPDUMPr 
• VIDAGE ECRAN dans lous las 
mais avec EPDUMP • Vidage te 

DMPI • Préciser les encras de fo 
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' ou* qui pouéd» un AMSTRAD, n'avoz-vous 

\f^/ jamali rêvé d'avoir un Macintosh ou mtmt 
^S d'utMIsor votre AMSTRAD pour foire dos des- 
sins dignes do Mac-paint ? 5/ c'est Je cas, alors fisoz 
attentivement les lignes qui sufvonr. 



Cette série d'articles a pour objet 
de vous décrire la mise en route, 
l'utilisation et le fonctionnement 
du programme "Cherry-Paint". 
Comme vous pouvez le consta- 
ter sur les photos, l'écran res- 
semble assez à celui de Mac 
paint, et ce n'est pas un hasard 
car le programme fonctionne uni- 



quement en MODE 2, donc avec 
une résolution de 640 x 200 
points, On pourra apprécier la 
finesse du tracé, surtout sur un 
moniteur monochrome, car sa 
résolution est bien meilleure. 
Contrairement au Macintosh, 
l'AMSTRAD ne possède pas d'in- 
terface "souris", aussi, ce sont 



les touches du curseur qui vont 
servir à déplacer les icônes et la 
barre d'espacement à "cliquer" 
sur les outils ou les trames. 



Dans ce premier épisode, nous 
allons nous occuper de créer la 
table des trames et l'image de 
fond pour le programme. Le pro- 
gramme "Cherry-Paint" ne pren- 
dra donc vie que le mois pro- 
chain, lorsque fonctionneront le 
crayon, la gomme, la bombe de 
peinture, le pinceau, la manipu- 
lation, la sauvegade et la restitu- 
tion d'une image. Pour ces sau- 
vegardes, il serait de loin préfé 
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rable de disposer d'un lecteur de 
disquettes pour ne pas atteindre 
*" des^temps de chargement d'ima- 
ges prohibitifs. Le programme est 
entièrement compatible CPC 
464, 664, 6128. 



description ; ; 
dés programmes 

,l_e» prernier programme de s ce 
mois s'appelle "TRAMES''. 
Comme son nom J'indique, Dé- 
programme va «transformer "les! 
trames de 16 x 8 points enregîs-" 
trées dans les lignes de DATA en 
un fichier binaire nommé 

'■ "TR.BIN". Ce-fichier servira aussi 
bien à la création de l'image de 
, fond que lors* de l' utilisation du 
programme -"Cherry-Paint'*. Si la 
forme des traînes ne vous 
convient pas, il est bien sûr facile 
de les modifier en changeant les 

•valeurs contenues m DATA, 

"sachant que sur l'image de fond 
la trame 1 sera située en haut à 
gauche, la trame 2 en bas à gau- 
che et ainsi.de suite. 
Le secottd' programme s'appelle 
"ECRAN". Avant de le lancer, il 



faudra vous assurer que le fichier 
"TR.BtN" créé par "TRAMES" 
est bien sur le disque. Le pro- 
gramme "ECRAN" va s'occuper 
de dessiner l'Image de fond de 
"Cherry-Paint". Pour cela, il -va 
procéder en plusieurs étapes, s 

* L&partie initialisation sélectionne 
le mode, les couleurs, charge la 
table des trames et remplit l'écran 
de caractères grisés. 

Les parties suivantes commen- 
cent toutes paTtfacer un cadre 
rempli de blanc,. qui contiendra les 
•différents objets .(outils, pin- 
.cëaux; tramesvetc.). Tous ces 
objets sont tracés en coordon- 
nées relatives, il est donc très 
facile de les déplacer ; il suffit de 
modifier les coordonnées de 

* départ. Evitez tout de même de 
. déplacer trop d'objets, sinon il ris- 
» que dese passer des choses sur- 
prenantes lors du fonctionnement 
de "Cherfy'Paint" I 

La dernière partie du programme 
va sauvegarder llrpage ainsi 
«créée sur disque sous le nom 
"SCR.BIN" puis va'boucler pour 
éviter d'écrire sur l'écran. 



Voilà pour aujourd'hui* je» vous 
retrouverai le mois'procriain pour- 
la suite de cette série en. espérant 
que vous ayez eu le courage de 1 : 
taper ces quelque 20 k de Basic. 



1D0 '- 



1 10 ' CE PROGRAMME TRANSFORME 

LES TRAMES DE 16*8 POINTS 

120 ' ENREGISTREES EN DATA EN 

UN FICHIER BINAIRE NOMME 

130 ' "TR.BIN" 

140 ' 



] DATA «HmJOOOMÏOOOKOrjO 
] DATA JX0OO0DQOO,6ÏO0O00OOO 
D DATA tïDD000000,i|00000bQ0 
1 DATA 6X00000000,6800000000, 
3 DATA JXOOODDOOO.^ODOOOOOD- 
] DATA fcXQDOODISJMXÛOaOOnOO : 
] DATA iïBOflOÛOflft.WOOOOQOOO*': 
) DATA iXOOOnOOOO.&ÏOOOOOÛÛO'- 



] DATA 6X11111M, 6X111 
D DATA 6X11111111,6X111 
] DATA 6X11111111,6X111 
] DATA 6X11111111,6X111 
] DATA 6X11111111,6X111 



* s*.8 ■ * 



l\ 



fi , v - . 
* H f : 1 ,; 
* '-■ ï: ï : S 
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î DATA 8X11111111, 6XI111111I 
) DATA 5X11111111,0X11111111 

j data wiiiniii.Huumi 



DATA 8X00000000. 
DATA 6X0010DDOO, 
DATA 8X00000000. 
DATA êXODDODDlQ, 
DATA 6XDO0000DD. 
DATA 6X00100000, 
DATA 5X00000000, 
DATA 5X0000001D, 



5X00000000 
5X0D 100000 
5X00000000 
8X00000010 
5X00000000 
5X00100000 
4X00000000 
6X00000010 



DATA 4X11111111,1X11111111 
DATA 4X11011111,4X11011111 
DATA 4X11111111,4X11111111 
DATA 4X11111101,4X11111101 
DATA 6X11111111,4X11111111 
DATA 6X11011111,4X11011111 
DATA 6X11111111,4X11111111 
DATA 6X111J1101, 4X11111101 



] DATA 6X00000000. 
1 DATA 8X00100010. 
) DATA 6X0D000000. 
) DATA 6X100O10O0. 
) DATA 5X00000000. 
1 DATA 4X00100010. 
] DATA 6X00000000. 
] DATA 6X10O01000, 



&XOOOO0DDO 
6XD0100010 
4X00D0O0O0 
6X10001000 
4X00000000 
6X00100010 
6X00000000 
6X10001000 



] DATA 6X11111111,6X11111111 
1 DATA 6X11011101,5X11011101 
3 DATA 6X11111111,6X11111111 
] DATA 8X01110111,6X01110111 
3 DATA 6X11111111,6X11111111 
) DATA 8X11011101,4X11011101 
1 DATA 4X11111111,4X11111111 
) DATA 6X01110111,4X01110111 



3 DATA 5X00100010. 
] DATA 5X100010D0, 
3 DATA 4X00100010 
] DATA 6X1000100D. 
] DATA 6X00100010 
] DATA 6X10001000, 
3 DATA 4X00100010 
] DATA 6X10001000. 



6X00100010 
6X10001000 
6X00100010 
8X10001000 
6X00100010 
6X10001000 
4X00100010 
6X10001000 



3 DATA 6X11011101,4X11011101 

] DATA 4X01110111,6X01110111 

3 DATA 6X11011101,6X11011101 

D DATA 6X01110111,4X01110111 

] DATA 4X11011101,4X11011101 

] DATA 4X0111D111, 6X01110111 

: DATA 6X11011101,4X11011101 

3 DATA 6X01110111,6X01110111 



880 DATA 6X10101D1D,4X1D101010 
890 DATA 4X01010101,8X01010101 
900 DATA 4X10101010,6X10101010 
910 DATA 6X01010101,8X01010101 
920 DATA 8X10101010,6X10101010 
930 DATA 6X010101D1, 6X01010101 
94D DATA 8X10101010,6X10101010 
950 DATA 6X01010101,6X01010101 
960 ' 

970 DATA 6X11001100,6X11001100 
9B0 DATA 8X00110011, 6XD0110011 
990 DATA 6X11001100,5X11001100 
1000 DATA 6X00110011,4X00110011 
1010 DATA 5X11001100,4X11001100 
1020 DATA 4X00110011, 6X0011DD11 
1030 DATA 4X11001100,6X11001100 
1040 DATA 6X00110011,4X00110011 
1050 ' 

1060 DATA 8X11110000,6X11110000 
1070 DATA 6X11110000,5X11110000 
1080 DATA 4X00001111,4X00001111 
1090 DATA 5X00001111,6X00001111 
1100 DATA 4X11110000,4X11110000 
1110 DATA 6X111100DD,6X1111DOOO 
1120 DATA 4X00001111,5X00001111 
1130 DATA 6X00001111,6X00001111 
1140 ' 

1150 DATA 5X11111111, 8X0OOOOOOD 
1160 DATA 5X11111111,4X00000000 
1170 DATA 5X11111111, 5X0000DD00 
1180 DATA 6X11111111,5X00000000 
1190 DATA 4X00000000,4X11111111 
1200 DATA 4X00000000.5X11111111 
121D DATA 4X00000000,5X11111111 
1220 DATA 6Ï0OCOOOO0, 6X11111111 
: 1230 ' 

: 1240 DATA 6X11111111,5X11111111 
! 1250 DATA 4X00000000, 4X0ODCOO0D 
1260 DATA 4X11111111,6X11111111 
1270 DATA 4X00000000,5X00000000 
1280 DATA 4X11111111,4X11111111 
1290 DATA 4X00000000,6X00000000 
13O0 DATA 5X11111111,6X11111111 
1310 DATA 4X00000000. 5XOOO0D0OO 
1320 ' 

1330 DATA 4X11001100,5X11001100 
1340 DATA 4X11001100,6X11001100 
1350 DATA 5X11001100,6X11001100 
1360 DATA 6X1100)100,5X11001100 
1370 DATA 4X11001100.4X11001100 
1380 DATA 6X11001100,8X11001100 
1390 DATA SXllDOllOO.&XllODllOO 
1400 DATA 6X11001100,6X11001100 
1410 ' 

1420 DATA 6X00001100, 6XD0001100 
1430 DATA 5X00001100,8X00001100 
1440 DATA 5X00001100, 8X0000110D 
1450 DATA 6X00001100,4X00001100 



1460 
1470 
1480 
1490 

15D0 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
15B0 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1B00 
1810 
1820 
1930 



1890 
!9DD 



1930 
1940 
1950 
1960 
1970 
1900 
1990 
2D00 
201D 
2020 
2030 
2040 



DATA 4X00001100,4X00001100 
DATA 8XOOOD1100,6X00001100 
DATA 5X00001100,5X00001100 
DATA 5X00001100,6X00001100 



DATA 4X00000000. 
DATA 4X00000000. 
DATA 5X11111111. 
DATA 6X00000000. 
DATA 4X00000000, 
DATA 4X000DD000. 
DATA 4X11111111, 
DATA 6X00000000, 



4XD0000D00 
SXOOOOOOOO 
6X11111111 
5X00000000 
5X00000000 
6XDOOOOO00 
6X11111111 
5X0000D0DO 



DATA 4X11111111,4X11111111 
DATA 6X11111111,5X11111111 
DATA 4X00000000, 4X000O0DO0 
DATA 4X11111111,6X11111111 
DATA 6X11111111,4X11111111 
DATA 6X11111111,6X11111111 
DATA 6X00000000,6X00000000 
DATA 6X11111111,5X11311111 



DATA 5X1 
DATA 6X11 
DATA 5X11 
DATA 5X. 
DATA 5X11 
DATA 5X11 
DATA 6X11 
DATA 8X11 



1DD11, 5X11110011 
110011,5X11110011 
110011,6X11110011 

10011,5X11110011 
110011,6X11110011 
110011,6X11110011 
110011,4X11110011 
110011,5X11110011 



DATA 6X00001100, 
DATA 6X00000011, 
DATA 6X11000000, 
DATA 5X00110000, 
DATA 6X00001100, 
DATA 5X00000011. 
DATA 4X11D0OOOO, 
DATA 5X00110000, 

DATA 6X00001100. 
DATA 6XD01 10000. 
DATA 5X11000000 
DATA 5X00000011, 
DATA 6X00DD1100. 
DATA 6X001 10DO0. 
DATA 5X1100D000 
DATA 5X00000011, 

DATA 5X00001000. 
DATA 6X00010000. 
DATA 6X00100000 
DATA 5X010000D0, 
DATA 5X10000000, 
DATA 5X00000001, 
DATA 5X000DDD10. 
DATA 5X00000100. 



5X00001100 
4X00000011 
4X11000000 
6X00110000 
6XD0001100 
5X00000011 
6X11000000 
6X00110000 

5X00001100 
6X00110000 
6X11000000 
4X00000011 
5X00001100 
6X00110000 
6X11000000 
5XD0DD001 1 

5X00001000 
4X0OD 10000 
4X00100000 
6X01000000 
5X10000000 
6X0000000) 
5X00000010 
5X00000100 



DATA U 0000!. m 
DATA 6XDO0O01M. 
DATA 6XMMM10. 
DATA 6X00000001, 

DATA 6X10000000, 
DATA 6X010M0M. 
DATA 6XM1000M, 
DATA 6XO0C100C0. 

DATA «00011000 
DATA AX00100100. 
DATA 6X0100M10. 
DATA &X1Q00D001. 
DATA 6X10000001. 
DATA 6X0100O0I0. 
DATA «001 MI M. 
DATA «00011000, 

DATA «00001111 
DATA «0D110DO0. 
DATA «11000000. 
DATA «00000000. 
DATA «00000000. 
DATA «11000000, 
DATA «00110000. 
DATA «00001111, 

DATA «D01 10000. 
DATA «00110000. 
DATA «llltUll. 
DATA «Ml 10000, 
DATA «Ml 10000, 
DATA «00110000, 
DATA «11111111. 
DATA «D0110M0, 



«CO001XC 
«000001 M 

«D0OOM10 
«OOMD001 
«10000000 
«01M0M0 
«00100000 
«M01M0O 

.«OMllDOO 
.«M1M100 
,«01M0010 
«10000001 
,«10000001 
.«0100M10 

«mioo:oo 

«00011000 

4XDQ00000G 
«110M000 
.«0011M00 
«00001111 
,«00001111 
«00110000 
.«11D00OM 
«DOOOOOOO 

«001 10000 
«Ml 10M0 
«1111111! 
«MliOOOO 
1IM11MO0 
«M1IMM 
«11111111 
«00110000 



DATA «00111100,«00111100 
DATA «11111111, «llllllll 
DATA «llllllll, «llllllll 
DATA «M111100.«MI111M 

DATA 4X00111100,1X00111100 
DATA «llllllll, «llllllil 
DATA «llllllll, «llllllll 
DATA «00111100, «00111100 



DATA «MI1MM, 
DATA «00110000, 
DATA «llllllll, 
DATA «OOOOOOM. 
DATA «00000000 
DATA «OMOMOO. 
DATA «llllllll. 
DATA «00I10M0. 



«00000000 
«DOOOOOOO 
4X11111111 
,1X00110000 
,«00110000 
,«00110000 

,«11111111 

«DOOOOOOO 



DATA 6XMW11M,6XMM!1M 
DATA &I0011MI1,«MI1M11 

DATA «110000M,«11000000 

DATA «DOC00011,«DOOOOD11 



2630 
2ù*G 
2650 
2660 
2670 
2680 
2690 
2/00 
2710 
2720 
2730 
2740 
2750 
2760 
4^770 
27BO 
2790 
2000 
2010 
2820 
2630 
2B40 
2950 



DATA «OM011M,«MMUM 
DATA 6X00110011,4X00110011 
DATA «11MMM,«11MOOOO 
DATA «OOM001I,«MOOOQ11 



DATA «10000000, 
DATA «1OOOOO00. 
DATA «0110MM. 
DATA 4X00011111, 
DATA «00000M1, 
DATA «00000001, 
DATA «D0000110, 
DATA 6X11111000, 

DATA 6X1001MO0, 
DATA 6X11100000. 
DATA 6X01111110, 
DATA 6X11000011, 
DATA 6XMOOOO01, 
DATA 6XDD0000)], 
DATA 6X11100100, 
DATA 6X00111000. 



6X0000D001 
6XOM00001 
«00000110 
6X11111000 
«1M0O0M 
6X1OMM0O 
4X01100000 
6X00011111 

4X00011111 
6XMUMM 
6X01M00O0 
6I100O0OM 

6X11111001 
«00001110 
6XDD000111 
4X00001100 



DATA 4X1100MU, 4X11111111 
DATA 6X11000011, 4100000000 

DATA 6X11000011,6X00000000 
DATA 6X11000011, 4X11111111 
DATA 6X11111111,6X11000011 
DATA 6X00000000,6X11000011 
DATA 6X00000000,6111000011 
DATA 6X11111111,6X11000011 



DATA 6X1M10001, 
DATA «11100011, 
DATA «11000111, 
DATA 6X10001001, 
DATA 4X10011000. 
DATA 6X01I1U00, 
DATA 4X00111U0, 
DATA 4X0001 1M1, 

DATA 6X01111110. 
DATA «10011111, 
DATA 6X11111111. 
DATA 6X01111110, 
DATA 6X000OMM, 
DATA 6X00000000, 
DATA «00000000, 
DATA 6X0O011M0, 

DATA 6XOM00DO0, 
DATA 6X00000000, 
DATA 4X00001111 
DATA &X00001UI, 
DATA 6X00001111 
DATA 6X000011 11, 
DATA 1X0000111! 
DATA 6X00001111 



6XIM10001 

4X11100011 
«Il dix : : i 
6X10001001 
6X10011000 
6X01111100 
6XMU1110 
«00011001 

6X0OOOD0M 

6XD0MMDD 
1X00DDD000 
6X0001 1000 
6X0111I1I0 
6X10011111 
6X11111111 
6X01111110 

6XM0MM0 
6X00000000 
6X11111111 
6X11111111 
6X00000011 
6X00000011 
«00000011 
6X1111111! 



3210 

3220 DATA 6X0OM0O11.6XO0MM1! 

3230 DATA 6IOOM1III,6XMC01111 

3240 DATA 6X00111111, 6X001111 11 

3250 DATA 6X11111111,6X11111111 

3260 DATA «00000011,6X00090011 

3270 DATA 6X00001111,6X00001111 

3200 DATA 61001111! 1,4X00111111 

3290 DATA 6X11111111,6X11111111 

33M ■ 

331D DATA 6IOM11MO,4XM0110M 

3320 DATA 6XM1111M,6XM1111M 

3330 DATA 6X01111110,6X01111110 

3340 DATA 6X11111111,6X11111111 

3350 DATA 6X11111111,6X11111111 

3360 DATA 6X01111110,6X01111110 

337Q DATA 6X001 1 1100, SIMM 1100 

3380 DATA 4100011000,6100011000 

3390 ■ 

3400 DATA 6X00001111, 6X00000000 

34)0 DATA 6XDD0010M,«00001100 

3420 DATA 6X00111100, 6XOQOOODD0 

3430 DATA 6X001111M, 6X00000000 

3440 DATA 6XOO0QOOM,4IO11110M 

3450 DATA 6IOM11000,6XOIU10M 

3440 DATA 6X00000OM.4IMO0U11 

3470 DATA 6XMM1II1,6XD0M1111 

3480 ' 

3490 DATA 6XDDO0MM, 6X0O00D0M 

3500 DATA 6X0OMMOO.6X1000OO0O 

3510 DATA «00000001,6X01110000 

3520 DATA 6XOOOM010,610111IOM 

3530 DATA 6I0MM1M,6XM1111M 

3540 DATA 6X00111100,4X00111100 

3550 DATA «0101 M 10.6X00001 100 

3560 DATA 6XM111!M,6IMOOOMO 

3570 ' 

3580 DATA 6X11111111,6X11111100 

3590 DATA 6XM0OO0M, 6X00001 100 

3600 DATA «11001 11 1, «11001 100 

3610 DATA 411 1001 10C. 4X11001100 

3620 DATA 4111001111,4X11001100 

3630 DATA 6X1! 000000. 4100001 100 

3640 DATA 6X1111111 1,4X11111100 

3650 DATA 6X00000000,6X00000000 

3660 ' 

3670 DATA 6X11010111,6X11010111 

3680 DATA 4X01010000. 6X01010000 

3690 DATA 6X01011111,6X01011111 

37M DATA 6X01000001,6X0100000) 

3710 DATA 6X01111101,6X01111101 

3720 DATA 6X00000101, 6XOD00010) 

3730 DATA 6X11110101,6X11110101 

374D DATA 4X000101D0.6XMO1O10O 

3750 ' 

3760 ADRÏ=650M 

3770 FOR IZ=I TO *0»16:B£AD BiRME ADRT 

,K:ADRï=ADRZ*l:*XT 

3780 SAVE'Tfl , ,E,15OM,A0Rl-65OM 



CE PROGRAMME DESSINE L'IMAGÉ DE FONB POUR (1 • 

fKomc œ-BinjfeAUMf se *ac-pm«t. il est 

INBlSPEMSABi «JE If DISQUE CONTENANT LE 
FICHIER "TR.im' (NEE AVEC LE PR0ERAW1E 
'TRAMES' SOIT DANS LE LECTEUR. 



INITIAL I5ATI0H 



CHU&ENENT DES DONNEES 



«E8EFÏNI.Ï10N DES CARACTERES FRANÇAIS 
B,HO,tK T *W,im,tM,lK 



SîHEOl 2S5,ï6,«ïl3ï|8 

»' 

6 ' INITIALISATION DE L'ECRAN 

6*. 

a nm t. 

S I* T ?tslNK l.CiBORDE* S « » 

S ' REMPLIT L'ECRAN DE GRIS 



'POUR Ul MONITEUR COULEURi : 



DESSIN DU CADRE Cl 



IT LEE EPAISSEURS DE TRAIT 



« Sï- 1 Ù : Cï=80 ■: HÏ-7B ; îï=a : SOSU» 3130 
»' 

559 m 14 T6 SiHOVÊ 2S,2B-l*2rDRAWR 30. 
•318 ' 

S2BFOR 1=0 TO ïilBVI ZS,«-I»Ï(D*ANR M. 

R 14 TO 1:N0VE 25,52-I«rDSAllR 30. 

560 ndve &,aimmw,s 

- | .- 

KJNOVE 25.68 
V FOR Ll TO 12 

R l,0iMOV£S 3,0 



NEïT 



H i.D 



'DESSIN DU CADRE 'EN ILANC1 
DiNEIT 'TRAIT D'EPAISSEUR 1> 
0:NEIT 'TRAIT D'EPAISSEUR 4 
OiNEIT 'TRAIT D'EPAISSEUR 2 

'TRAIT D'EPAISSEUR 1 

'POINTILLE 

'12 SEGMENTS 

'ALLUME 2 POINTS.AVANCE DE 2 
'POINTS PUIS RECOMMENCE 
'TERMINE PAR UN SEGMENT ALLUME 



630 ' 



650 DRAW 2,0:DRAIiR Q,2:DRAMR 3,àiDRAWR 1, 



V POINTEUR 



DESSIN DU CADRE CONTENANT LES PINCEAU) 



730 MUE 45,1B8:DRAU «,88,1 

■e 46, i.m-.vm «,B8 
m FOR 1-t ÎO 1 

HOVE 10,1»Q-3MI:DRAU 80,110-3**1,1 



'DESSIN DU CADRE 
'DESSIN DU QUADRILLAGE 



'DESSIN OU GROS PINCEAU CARRE 



BTO NOVER 1 

m* - 

VIS HOVE 20, 

'30 N5VE 54, 
M' 



■2iflR» î,0:K«P -î.-îiDfWJR -3,B 



'DESSIN X PINCEAU. CHIQUE. 



'DESSIN BU PETITPWEAU-SONSs I 



DESSIN BU .CADRE C0NTEMANT,LES OUTILS . 



1030 Gl>10M>I>SOiHt«]70i|K*îgO;EOSUI 3130 
iOWÎ 

1050 MOT 4S..170:B«At( 45.200,1 

tOSOROVE Ai.îiTJsDTW 44,200,! 

1070 FO» 14 TO 4 : 

1080 HOVE l0,37(KJ4»Il0RSUfl0 1 37O-»tï,i 



HOVE 22,330iDRAUR 2,10:E)RAUR )0,20:DRAMR 2,0 
DRAUR 1,-2:DRAUR l,0:DRAUR 0,-4:DRAUR -*,-IB 
DRAIJR -7,-6;DRAIlfl 1,2:N0VER 3,B:DRAUfl 1,0 
ÛRAUR 1,-2:H0VER -1.2:DRAUR B, 16 

a • 

NOYE 22,312iDRAMR 0,4iDRAUR <?,0:UR» 0,-6 
OlflAHR ^,0:NOVER 1D,2iDRAUR 3,6itRAHfl 0,6 
f DRAUR -3,-6fHOVEfl -9,D;iiilAUR 3,6iDRAUà 9,0 
' 
NOYE 62,330sDRANR 0,-10lDRAUR 1,0:BRANRO,12 

o draur i.a-.mm b,-2ibraiir i.oinovero,»* 

S mm 0,-&iDR4WR -i.OîOSaus OViîNOffiR -&,-$ 

a BRAilR ll ( 0tS»AMR D,-IO:DRAWfl ~l,-2 

fl BRAtM -lî.tNDMM 2,4ïDRAWB 0,4l«0ffift 0$-Z- 



. 'DESSIN 1*1 CADRE , „ : 
'DESSIN DU QUAD811AA6E 



'■DESSIN DE PINCEAU. 



r -1,0 



NDVE 57, 3*0: DRAUR 


D.lâiSRAkS lj.0:OaAUR D 


-18 


DESSIN 


DELASOttiE 


DRAUR 


13,G:NWER 
.OiDRANR 1 


: , ZSiDRAWR I.OjBRAUR 9,2 
2lDftWB 3,DlDRAUR 1,-2 










DRAW) 2,0:DRAUR 


-2iDRAtfR l.SiHBVES H# 








DRAW) 


3,0:HWEfl 










DHAUR 


,0:ORAUR 


2:DRAUR -6,0 











iO HOVE 24,272:DRAUR -«.BîDRAUR 0, 10:DRANR.Ï,2 > 'DESSIN SI 

'0 DRAUR 1,0!DRAUR0,-«:BRAWR î,^:DRAMRs.l,3 « : t 

B DRAW B,10:DSAUR -1.21BRAWR l,?;DSAWt 1,0 » ; . 
'0 DRAMR 2,-4iDRAUR O,-6:MO«ER.0,J0:DRAllR 1,0 
10 ORAWR 2,-4:DRAllH 0,-i:MOVER;0,lDiDflAlW 3,-4 

DRAUR 0,-fl:IKNER 0,g:DRANR 2,-4:DRAUR 0,-10 . 



(0 HOVE 50,274 
.0 POR I«l TO 3 
>0 DRAUR 3,QiN0VER 3,0 



1490 FOR 1=1 TO 2 



10 DRAUR D,3:DRAWR -1,0 

10 FOR N TO 2 

iO DRAHR D,-3iH0UER 0,-3 



■R D,-3:H0VER 1,!S 



1570 FOR 1=1 TO 3 



10 HOVE 60,174:DRAUR 3,DiDRANR D,- 3: DRAW» -3,0 'DESSIN DU PETIT PINCEAU CARRE 



FOR 1*1 TO 


2 


DRAW) 0, 


1:D0VER 0,-7 


NE1T 




DRANR 0,-1 


SRAUR 1,0 


FOR l'I TO 




DRAUR 0, 


:NOVER 0,7 



B «M n.Hù-.tUM \\,-U:WH* 1,0:DW.IR -2,0 'DESSIN K LA ll"TK 'I 
ID MW -l!.22:MAW 0,-liCMMM lD,-20iD«AM -1,0 

B> HWAt ;,0:DMM! -iB.20:DRAMR -lD,-2QiDRAi* -1,0 
» MM 4,0iDMW -2,0iDMM) :D,2C:1W[B -1,-11 



2w »"îi!iiv*2*iHi.]àîîH-*S!a>sui un 

MM' 

2500 RM fi.MiKW U*,JM,t 

2310 FM 1>349 TO 3tî STE" i 

2520 RM IDS.IiDRAH iU,l,l 



■DESSIN DU CMC 



'DESSIN DE LA «BOITÉ 



KM l*,Z2t;DRAk* 2B.0;D*AHA Q,-2CiDRANR -18.0 'DE56IN OU RECTANGLE VIDE 

MW! D,20iDMM ir.DtHWK 0.-X:MU*B -24.0 

.0 MM 0,20 

D ' 

K MM H,22tiMMR 2B,0iMM« 0,-20:»»* -28,0 'DESSIN OU RECTANGLE PLEIN 

i0 MUR 0,20iMMM ?!,0:DWiW O.-fflîDRAWR -26,0 

DRAM 0,20 

a roR m to s 

■0 FOR J'I T0 13 
O HOIR 2,0 

n pot 

O RMR 1,-2 

10 FM J-l 10 1* 
10 PLOT* -2,0 



DESSIN DU CURE CONTENANT LA JARRE K ISNU 



2010 6>-2:inH«:«.-«0:U'3M:&'SUl 31» 

2B20- 

20» TASiRM tO, J" 

«[NT- Ficfcivr Editirn F*cllll'«CHM{2»lt 

20N PHINT 0ipai:t'O«I21t)<'rM Ttillt Stull'i 

OTAG0FF 

■ I 
208D NOVE D,380iDRANR (40,0,0 



-KSSTN DU CAORE 
'INNESSION DES OPTIONS 



'DESSIN DE LA CERISE 



DESSIN DES ARRONDIS DES COINS 



BH NMC 0.142 iDRNI O.WD.liRM I.JWiDRAK 1,400 

■ «CM 2.M>MW 2. W0;RM T.JRtiMAH 3.WO 
2Z> KM *,«:«** «.AflOtHM S.TOiMAil ).«0 
«I t.WO.RM J.WiDRAtl 7,*0B 



22*0 «PME U4.1*îiDRAM 614,*00.I:RM 638,192:081*1 636. "Dû 'COIN EN HAUT 
RM AJT.miDRAH t37,«0iKM 616,19*!DRAW Ut, «Kl 'A DROITE 



DESSIN DU CAORE CONTENANT LES TMICS 



2*30 6I»WiM^JO:HI-tB:n-B!«iSUl 31» 'DESSIN DU CAORE 

26*0 ' 

2650 INVE 132,2BiDRAJI 630,28 'DESSIN DU OUURlLLAGEl 

2660 FM 1-1 TD 20 

»ni KM U2-i>2t.t8iMAM 0,-40 

2iB0 DRNM -l.Q:MAJ* 0.40 

2640 NEIT 

2700 ' 

2710 O=l(U!DW]tiKI>t0in>U:60SUl K» 'DEKIN RU PETIT 

2T20- 

2710 KINT CHM(2»tMI<l>|tlM 'MX HHM1QUE 

27*0 ' 

275D CAIGIN 0,0,0,639,46,30 'RANGEE DU HAUT 

2760 FOR 14 TO .18 STEP 2 

2770 A-KODLlM.lt 

7780 GtiaM. 2JA,PEEX!AI,KFJII«'21,REEKI«*4),REBI[AH), 

nXKIAAl) ,fE»l AMOl.PEBUAHH ,PEEK(A*1*> 
27V STUWL 2U,FfEHIA*l).REBI(A«ll,FfEK(A4l,>£EI(A*TI, 

PEEK I A** 1 , FMI I A* 1 1 1 , PEEJKM13 1 , PEEK I H* IS I 
2S0O RM lS2+2**l/ï,4t "UTILISE 2 CARACTERES | 

2810 WIKT Ot»I2»)*OMt]S)}»OWt2!Ml| '84 POUR FAIS UNI 

2820 RM I52*2Mlrt,30 '«A* lb'6 

28» PRINT CHRI(2M)«CHR«(2»)t(HH(254)i 



2B50 OflIGIN 0,0,0,619,26,10 

28èO FM ]•! TO 19 BTEP 2 

2870 A»M DO0>Ji It 

2BBD SnOOL 2M,PEEI(IA),PEEH(A*2),PEEK(A>A),PESltA*AI, 

PEEK l Wl , PEEK I A> 1 01 , PB» t A* 1 2 1 , PLTKI»*1»I 
7890 EH8NL 2n,NEEK(A*l),PED((AO],PEEK(At]),lCB((A«2) 

P£Ef:.t'*!.PEE>i»*lll,PEEMA-l]l,>EB((A*l5l 
7400 RM 117»24tlNT< 1/21,2* 
2410 PRINT WR»I2SmCHr»l25SHCHflil2S*l| 
2420 RM lS2*24i]NT(I/2),10 
241D PRINT CHRt.l25*]tCHR»t25SHCHR»l25tJi 
29t0 NE«T 
7930 PRINT CHRII23>+CHR*fD>iTAbOFF 



RANGEE DURAS 



'IPHGEKCDXAffFT | 

'DOUCE POUR NE PAS 
'AIlfTER L'UME 



RM 0,0:DRAH 0,7,liRM l.OiORAM 

D RM 2,0iMAN Î.JiRM l.OiMAN 1, 

2BB KM t.OiDRAM A.liMM S.0:MM( ), 



SOUS-PR06RAM OE TRACE DE CADRE6 



PARAftTRESi Ht I HAUT 



2M RM *J9,0iMAil 639,7,11*04* *3B,0:0RAN 618,7 
• ■NE *J7,GiDRAN U7,3iNM tlt.OiMAM bit,] 

■ RM AO.OrDRNI tli.liRM tW.DlDRAU UA.l 

■ RM èAOïDRAU 6U,liflOVE U2,0:DRAU 612,1 



DESSIN DU CADRE CONTENANT LA FEUILLE DE DESSIN 



3130 FOR KMI TO DI 

Jl'l) KM «,HiilRAW HI.HI.O 

31J0 NEil 

1160 ' 

3170 RM Gl,IIiDRANSI,HI,l:D«AU Dt.HÏ.I 

1180 DRAW DI,1X,1:DMH GI.ll.liRM GI*2,n-2 

1190 DRAM (Hti,|t-2, HDiUU 0T*l,HI-2,I:nrM DK2.R-2 

1700 DRAW DI+Î.HÏ-4, 1 :«M DI-3, 11-2: DRAM Cl-J.«I-o,l 

1210 RM GX-l.RIiMAN 6I-: .h: 

3220 ' 

3210RETURN 



MORPIONS 



Daniel DEPINOY 



Ce programme est un grand 
classique des jeux de straté- 
gie où vous jouez contre l'ordina- 
teur sur une grille de 10x10. 

Le premier qui réussit à aligner 
cinq de ses pions en horizontal, 
vertical ou diagonale a gagné. Un 
chronomètre indique la durée de 
la partie qui est limitée à une 
heure. 

Tapez ce logiciel qui allie une très 
belle présentation à un niveau de 
jeu surprenant par sa force et sa 



rapidité pour un programme écrit 
en Basic ! 

Entrez, dans un premier temps, le 
programme de chargement 
appelé Loader et sauvez-le sous 
le nom Morpion. Puis, entrez le 
programme de jeu que vous sau- 
verez avec le nom Morpion 1 , 
juste après le programme Mor- 
pion. Lors de son exécution, le 
programme Morpion affichera 
une belle page titre et chargera 
automatiquement Morpion 1 . 
Bon amusement. 
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LES LOGICIELS PROFESSIONNELS DE 

pin inf ormotiquc 

POUR VOTRE CPC 464, 664, 
6128 ET LE PC W 8256 
Ré» pm 83A FICH ET CALC 

Gestion de fichiers - Vous créez vos fichiers et vous les 
exploitez - Classement par code • Séquentiel intégré - 
Éditions sélectives (Clients, stocks, paie, tarifs, inventaire, 
étiquettes, adresses - de prix). 

TTC 950 f rano 

Réf PM 84A COURRIER TEXTE 

Traitement de courrier - Stockage de 20 textes de 200 
lignes. 

TTC 420 f rana 

Réf PM 85A FICH ET CALC + COURRIER - TEXTE intégré 

Permet l'édition de courriers aux destinataires sélectionnés 
dans les fichiers avec appel possible de renseignements 
contenus dans les fichiers. 

TTC 1 200 f rana 

Réf PM 25A COMPTA PM 

10 journaux, 5000 comptes 

2000 écritures avec 1 disquette 

Remise à zéro en cours d'année possible avec reprise des 

cumuls. 

nC 1 450 f rana 

Réf PM 43A DEVIS FAC 

Fichier articles avec prix de vente. Rédaction et édition des 
devis et des factures. Livre de ventes. 

TTC 1 050 f rana 

Disquettes de démonstration + documentation = 365 francs dont 280 
francs déductibles lors de l'achat de la version complète. 
Envoyez votre adresse avec le chèque en précisant: 

- La référence PM 

- La version (démonstration ou complète) 

- Le type de votre CPC (664 ou 6128). 

à retourner à fT1ICrot0X 

22, place de la république - 59170 CROIX 
tél. 20.98.66.86 
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Michel ARCHAMBAULT 



ntrez un mot de trois à six let 
■très, et ce programme affiche 
a l'écran ou sur imprimante tou- 
tes les combinaisons de ses let- 
tres, c'est-à-dire ses anagram- 
mes. Autre possibilité : entrez 
une à une les syllabes d'un mot 
ou d'une phrase (six éléments 
maximum), et ce sont alors ces 
combinaisons que l'on appelle 
contrepèteries. 



Le nombre de combinaisons est 
égal au "factoriel" du nombre 
d'éléments ; exemple avec qua- 
tre : 4! = 1 x 2 x 3 x 3 = 24. Ainsi, 
on a 2! = 2 ; 3!=6, 4! = 24 ; 
5! = 1 20 ; 6! = 720 et 7! = 5040. 
Vous comprenez alors pourquoi 
on a limité le nombre d'éléments 
de trois à six. 

Certes, ce programme peut être 
classé "utilitaire" pour certains 
usages rares, comme pour créer 
un nom pour une société, un pro- 
duit nouveau, un pseudonyme, 
etc., mais en toute sincérité, il a 
été conçu pour jouer, car certai- 
nes "solutions" affichées sont 
inattendues. Exemple ; demandez 
les anagrammes du mot ECRAN 
et parmi les 120 solutions, vous 
trouverez : CARNE, CRANE, 
ANCRE, ENCRA, CERNA et 
NACRE (essayez le mot ABUSIF 
et vous aurez une surprise assez 
drôle. ). 

Lorsqu'il y a plus de six lettres, 
il faut passer en option "Contre- 
pèterie", où l'on entre des frag- 
ments du mot à mouliner. Peu 



importe l'orthographe, ici seule la 
consonnance finale est intéres- 
sante. Ainsi "piraté" va donner 
"thérapie", alors qu'en anagram- 
mes on obtient "paître", 
".patrie", "partie" et "repait". 
On y passe des heures... (sou- 
vent tardives). 

LE LISTING 

Le sous-programme en 7000 est 
un titre fantaisie, avec un peu de 
son. Le programme réel com- 
mence en 1000 par le menu 
"anagrammes ou contrepète- 



LA PARTIE ANAGRAMMES 
(lignes 1100 à 11801 

demande le mot à traiter ; il est 
mis en majuscules et mesuré. 
Puis, on demande "affichage à 
l'écran ou sur imprimante ?". 
Dans les deux cas, ce sera en 80 
caractères par ligne (MODE 2), 
d'où calcul de NPL = nombre par 
ligne, en laissant un espace en 
début de ligne et entre chaque 
"solution". 

Enfin, chaque caractère est indicé 
en M$(l). 

LA PARTIE CONTREPETRIE 
(lignes 1200 à 1290) 

invite à entrer élément par élé- 
ment (avec ENTER) ; ou conclue 
par une action sur ENTER. Cette 
fois, les Mî(l) représentent des 
groupes de lettres (éléments). On 



calcule la longueur totale LTOT 
en caractères, alors que L est le 
nombre d'éléments, et bien sûr 
calcul du NPL. Il n'y a pas d'op- 
tion imprimante. 

L'ECRAN 

(lignes 2000 à 2060) 

est en MODE 2 avec deux WIN- 
DOW : un bandeau supérieur de 
trois lignes l # 1 ) où l'on trouve les 
deux options en fin d'affichage, 
à savoir M - retour au menu prin- 
cipal et P pour passer à la page 
d'écran suivante. En haut à 
droite, le numéro de la page 
d'écran en cours. Un trait continu 
sépare les deux WINDOW. La 
partie inférieure de l'écran 
comprend vingt lignes d'affi- 
chage. 

LE TRAITEMENT 
(lignes 3000 à 3320) 

C'est bien sûr le "gros morceau" 
(merci Aspro.... ). C'est une suite 
de boucles FOR NEXT imbriquées 
avec des GOTO conditionnels 
aux NEXT correspondants (lignes 
3240 à 3290). A chaque "rem- 
plissage de case" A1, A2, A3, 
etc., on contrôle que cet élément 
n'a pas été utilisé antérieurement. 
S'il est "neuf", on le concatône 
à la chaîne B$ en cours de cons- 
truction. Lorsque B$ a ses L élé- 
ments, on l'envoie en GOSUB 
5000 (ligne 3220) pour se faire 
afficher ; B$ est ensuite remise 
à zéro (ligne 5070) et on recom- 



mence jusqu'à la fin des combi- 
naisons possibles. 

L 'ECRITURE 

(lignes 5000 à 5050) 

Les solutions B$ sont écrites à la 
suite mais comptabilisées sur une 
ligne par T, jusqu'à T = NPL où il 
y a saut de ligne. Ligne 5030, la 
fonction VPOS arrête l'écriture 
lorsque l'écran est rempli. On est 
alors dans l'attente de frappe de 
"M" ou "P". 

Lorsque l'ordinateur a terminé 
son travail, il le signale par un 
"son étrange venu d'ailleurs" 
(ligne 3310). 

Les 120 anagrammes d'un mot 
de cinq lettres tiennent sur une 
demi-page d'écran ; les 720 ana- 
grammes d'un mot de six lettres 
demandent trois pages et demi. 
En revanche, une contrepèterie 
de cinq éléments, mais totalisant 
quinze caractères, ira jusqu'à la 
moitié de la page deux. 
Si en anagrammes vous avez 
opté pour l'imprimante, c'est 
beaucoup plus simple, car il n'y 
a plus de discontinuité dans l'écri- 
ture (ligne 5060 avec flag 
IMP=1}. 

LE TITRE 

(lignes 7000 à 7900) 

Nous sommes en MODE et 
chaque chaîne paraît bizarre 
puisqu'il s'agit d'anagrammes. 
Puis, lettre par lettre, tout est 
remis dans l'ordre. Un autre son 
"étrange" (ligne 7500) fait la 
transition avec la page menu. 

LE FINAL 

(lignes 1400 à 1420) 

Appelé par l'option "F" du 
menu : BORDER, PAPER et PEN 
sont remis aux valeurs habituel- 
les par défaut ; puis CLS et END. 

CONCLUSION 

On peut, bien sûr, entrer des chif- 
fres ou des signes de ponctua- 
tion, combiner anagrammes et 
contrepèteries en plusieurs pas- 
ses. Les moules au minet I Hein 
? Heu... pardon... : Moulinez les 
mots I 



10 ' MOUUMOT / AMSTRAD CPC 


3040 FOR A2=l T0 L 


20 ' ANAGRAMMES & CONTREPETERIES . sur M 


305D IF A2=A1 THEN 32B0 


ot de trois a six Eléments. 


30iD Et=M*(All+M*IA2) 


30 ' Michel Archawbault - 9 / 1905 


3070 FOR A3=l T0 L 


1DU G05UB 7D0O:'TITRE 


3080 IF A3=A1 OR A3=A2 THEN 3270 


1000 ' MENU 


3090 Bt^M(Al)tf«IA2l+l1*(A3) 


1010 MODE 1:B0RDER 9:INK 0,1:1NK 1,24:PA 


3100 IF L=3 THEN 3220 


PER 2:CLS:DEFINT A-Z 


311D FOR A4=l T0 L 


1020 L0CAÏE 13,5:PEN 3:PRINT 'H U L I 


3120 IF A4=A1 OR A4=A2 OR A4=A3 THEN 324 


M T" 





103D PEN D:L0CATE 12, 1G:PRINT 'A - ANAGR 


3130 BÏ=M*{AI>+M1A2HMS(A3)+M*(A4) 


AMKES. ' 


3140 IF L=4 THEN 3220 


1040 LOCATE 12,12:PR1NT 'C - CÛNTREPETER 


3150 FOR A5=i TO L 


IES.' 


3160 IF A5=A1 OR A5=A2 OR A5=A3 OR A5=A4 


1050 LOCATE 12, 14-.FRINT "F - FIN.' 


THEN 3250 


1060 TEXt='ACF':GÙSUB 50000:ON K GOTO 11 


3170 B»=Mi(Al)+MHA2)+M$(A3)+fl*<A4)+Mt(A 


00,1200,1400 


5> 


1100 CLS:LOCATE 11,10:PR1NT "(3 a 6 le 


3180 IF L=5 THEN 3220 


ttres 1 


3190 FOR A6=l T0 L 


1105 LOCATE 6,12:PRINT '1 6,24,120,720 c 


3200 IF A6=A1 OR A6=A2 OR A6=A3 OR At=A4 


□nhinaismts )' 


0H A6=A5 THEN 3240 


1110 PEN 3:L0CATE B,8:INPUT "VOTRE MOT : 


3210 Bt=MtlAl)+M*<A2]+flïlA3)+Hi(A4)+M*(A 


■,î1t:M=UPPeRS(Mï):PEN 


51+MÏIA61 


112D L=LEN(flï)! IF L<3 OR L>6 THÊfJ PRINT 


3220 GOSUB 5000 


CHRi(7);:G0T0 1100 


3230 ON L-2 GOTO 3270,3260,3250,3240 


1130 PEN 3:L0CATE B,17:PRINT 'Sur ECRAN 


3240 NEXT 


ou IMPRIMANTE ?" 


3250 NEXT 


1140 TEX*=-EP:G0SUB 50000: IMP=K-ls IF IM 


3260 NEXT 


P THEN PRINT »8,CHRtl27];CHRïl64); 


3270 NEKT 


1150 NPL=INTI79/(L+1>> 


3280 NEXT 


1160 FOR 1=1 T0 L:ttt(I)=MID*<N$,l,l):NEÏ 


3290 NEXT 


T 


3300 IF IMP=1 THEN PRINT #8:PRINT IB.CHR 


1180 50ÎO 2000 


*<27);CHRt<64):RUN 1000 


1200 CLS:LÛCATE 12,5:PRINT "I 3 a 6 Syll 


3310 ENV 1,100,2,2:ENT 1,10D,-2,2:SOUND 


abes ) 


1,220,150,1,1,1 


1210 LOCATE 6,7:PRINT ■< 6,24,120,720 co 


3320 Qt=":UHlLE Q*=":Qï=UPPER*UNKEYt) 


nbinaisons 1 


:UEND:IF QÏ-'M* THEN RUN 1000 ELSE 3320 


1220 PEN 3:L0CATE 2,3:PRINT 'Votre MOT , 


5000 'ECRITURE 


par syllabe :';;PEN 0:PRINT'(ENTER=fin) 


5010 IF IMP-1 THEN 5060 


■:1=1:LTOT=0 


5020 T=T+1:PRINT ' ';Bt;:IF T=MPL THEN T 


1230 PEN 3:L0CATE 15,2*I*7:INPUT",M*(I) 


=0:PRINT CHRÎU3) 


1240 IF M*(I)="- AND I>3 THEN I=I-1:60T0 


5030 IF VPOS<*0)=21 THEN QÏ=":WH1LE Qï= 


"1260 


":Qt=UPPERilINKEYt):UEND:IF Q$='M' THEN 


125D IF I<6 THEN I=I+l:G0TO 1230 


RUN 1000 ELSE IF QtO'P* THEN 5030 


1260 FOR J= 1 T0 1:LT0T=LT0T+LEN(M»<J1): 


5040 IF yPOS(#0)=21 THEN CLSïPG=PG+1sL0C 


NEXT:L=I 


ATEI 1,70, 2: PRINT 11, 'PAGE " ; PG 


1270 NPL=INT(79/(LT0T+J)1 


5050 GOTO 5D70 


1290 PEN 0:GOTO 2000 


5060 T=Ttl:PRINT Ifl,' ';BS;tIF T=NPL THE 


1400 'FINAL 


N T=0:PRINT.IB,CHfi*U3) 


1410 BORDER hPAPER D:PEN l:CLS 


5070 B»=": RETURN 


1420 END 


7000 'TITRE 


2000 'ECRAN 


7010 MODE 0:B0RDER 8 


2D10 MODE 2:INK 0,14:INK l,OrB0RDER 13:P 


7020 PAPER 7:PEN 2:CLS 


APER 0:PEN 1 


7030 LOCATE 3,7:PRINT 'I M T U L M 0" 


202D HINDOU *1,1,B0,1,4:CL5 «1 


ja 


2030 HINDOU tt0,l,B0,'5,25:CLS «0 


ft^rk 


2040 LOCATE «1,26,2:PR1NT 11, 'H = MENU ; 


fer« 


P = Page suivante.' 


V»/ p 


2050 PG=1:L0CATE *l,70,2:PflINT 11,'PAGE 

"iPG 

206D LOCATE ll,l,3:PRINT ll.STfllNGïlBQ,' 


vrnd£Q|pL 


jifcrffll 


') 


C^ti^il c pcO^^Ji 


3000 ' TRAITEMENT 


^*»i4jl \^ j 


3020 B*=* ■ 


j* ^**ff*\ 


3030 FOR Al=l T0 L:Bt=M*<Al) 


i * \ 



EXPO 



DU 6 AU 9 DÉCEMBRE 1985 



HOTEL-EXPO, HOUDAY INN 
PARIS - PORTE DE VERSAILLES 



LES MATÉRIELS, LES LOGICIELS, 

LES LIVRES, LES PÉRIPHÉRIQUES 

ET SERVICES... 

L'UNIVERS AMSTRAD 



Le 1*' salon exclusivement réservé à 
l'univers AMSTRAD. 
Vous y trouverez les dernières nou- 
veautés : matériels, logiciels, péri- 
phériques et services. 



Accès : 

Bus : PC - arrêt Porte de Versailles. 
Métro ; Station Porte de Versailles. 
Boulevards extérieurs et périphéri- 
ques. 
Parking : Parc des Expositions. 



QUATRE JOURS D'EXPO À NE SURTOUT PAS MAN- 
QUER, QUE VOUS SOYEZ OU NON POSSESSEUR. 



Ouvert de 10 h 00 à 1 8 h 0> 
HOTEL-EXPO Holiday Inn, 
73, Bd. Victor, 75015 PARIS. 
Porte de Versailles 



Une promotion exemplaire I 
Affichage, presse, radios, télémati- 
que (serveurs), mailing et invitations 
feront de ce salon un véritable suc- 



QUATRE JOURS EXCEPTIONNELS 
D'AFFAIRES, DE JEUX ET CONCOURS., 



Entrée : 

Du vendredi au lundi ; adulte : 25 F 
Enfant de moins de 14 ans : 10 F 
Ticket unique par correspondance, 
évitez l'attente :15 F 



><£- 



Exposants : 

Les développeurs sur AMSTRAD et 
les sociétés distribuant du matériel 
compatible AMSTRAD sont nos 
exposants. Si vous aussi avez créé, 
contactez-nous rapidement. 



AMSTRAD EXPO (APC, 109 rue Gaston iauriau, 93100 MONTREUIL, Tél.: 48.59.71.01) 
Veuillez me faire parvenir tickets uniques au prix de 15 francs chaque. 



. F ù l'ordre de DAD. 



NOM . . 



704Q PËN 5:L0CATE 9,12:FRINT "par" 

705U PEN 1:L0CATE 2,14:PRJNT 'GMbcI Cha 

multarba" 

7D60 PEN 12:L0CAÏE a,17:PfllNT 'ISffir" 

707Û FOR 1=1 TÛ 2Q:5ÛW4D 1 ,D,20, 15 :NEXT 

70B0 PEN 5:LQCATE 2.2~J:PRINT 'Ho'.. enr.u 

set-moi... 

7090 FOR 1=1 TO 100D:NEXT 

71DD M='r1 U L 1 M T 1 :Yï="Mir_t,e] Arc 

h»battlt*»ï#«*i9B5' 

7110 PEN 1:FCR 1=1 T0 LENIX$):LDCATE 2*1 

,hPRINT HID*(»,I,n:F0R J=l TO 20D;NEX 

T;mn 

7120 PEN 2:F0R 1=1 Tû LËN(Y«):LOCATE 1+1 

,14:FRINT MID*(Y*,I,1):F0R J-l T0 20Q:NE 

XT:NEXT 

713D PEN 4:F0R 1=1 TO LENIZSIrLOCATE 7+ 

1,17:PR1NT rlID*'2t,I,ll:F0R J=l T0 2Q0:N 

EÏTiffiXT 

714D PRINT CKR*(21JiF0H 1 = 1 TO I0DD:NEXT 

75ÛQ ENT 1,jOQ,-:,2:SjIJND 1,284, 200, 13,0 

,1 

7600 FOR 1=1 T0 MODirSïT 

7900 RETURN 

5DO0O 'REPONSE A UN MENU 

5QQ10 LT=tÊN(TEX*)tR*=" 

5002D L0CATE 15-LT, 2*t : PRINT 'Réponse C; 

50O3D FOR 1=1 T0 LT-1 

50040 PRINT MIDt<TEXi,I,l);Y;:NEXT 

5GD5D PRINT fiIGr)Tt(TEXt,l); , ) , ;CHRt(154) 

(CHRÎ(243)iCHRt(207) 

50D60 TEÏÎ=UPPEfit(TEÏ*l 

50070 WHILE R*=":Rî=INKEYt:HEN[) 

500BO Rt=UPPEHtlHI);K=lNSTfilTEït,R*) 

50090 IF K=0 THEN Rï= ,, :PRU4T CHRï(7);:G 

0T0 50070 

50100 RETURN 

45535 ' FIN DE LISTING 



MICRO- 
ORDINATEUR 82 



LE SPECIALISTE AMSTRAD 
A MONTAUBAN 

ORDINATEURS CPC 
464, 664, 6128 et PCW 6256 

Nombreux logiciels et 
périphériques 

39, rue de la Comédie 
(près du Théâtre) 

82000 MONTAUBAN 
Tél.: 63.66.27.22 



Imaginez que votre AMSTRAD 
vient de tomber en panne : il ne 
lui reste plus qu'un petit kilo-octet 
de mémoire. Saurez-vous écrire 
des programmes originaux per- 
formants qui ne tiennent que 
dans ce kilo-octet ? Attention I 
vos programmes devront être 
écrits en Basic, mais les routines 
en code machine présentées sous 
forme de data sont acceptées. 



Faites-nous parvenir vos pro- 
grammes sur cassette, accompa- 
gnés d'une brève explication. Les 
cassettes vous seront retournées 
si vous le demandez. 
Alors, tous à vos claviers. M faut 
réussir à loger le maximum d'in- 
telligence dans un kilo-octet. Les 
meilleurs programmes seront mis 
à l'honneur dans CPC et leurs 
auteurs récompensés. 



Les fainéants ont bien travaillé ce 
mois-ci. Nous avons sélectionné 
deux programmes qui rapportent 
à leurs auteurs un superbe livre 
d'aventure. Rémi LAPORTE a 
décidé d'arrêté de se shooter 
depuis qu'il a écrit Délirium sur 
son AMSTRAD. Ça fait le même 
effet, et surtout, ça coûte moins 
cher. Voici réunis les 708 octets 
les plus dangereux de l'année... 
David WELCHE, quant à lui, pro- 
pose un programme passionnant 
qui vous permettra d'acquérir en 
jouant une dextérité phénomé- 
nale au clavier. Vous voyez que 
l'on peut en loger de belles cho- 
ses dans un kilo-octet. 



- DELIRIUM - 
J'Inf 



Répétition — 

3 HEM R.LAPORTE - 2B/9/B5 

10 MODE 1 

20 ORIGIN 32Û,lB0:DEG:FCiR b=D T0 15 
30 FOH t=l T0 1500 
40 «=81 
50 y=250 

60 M 2,0,26:PEN 2:L0CATE 17,2:PRlNrDE 
LIRftflt* 

70 EIW l,l7*RND(a],l,29«RND(al:ENT 1,19* 
RNDla),-2,27*RNDU);SQLM> 1,0,5,15,0,0,1 
5iRND<a) 

BO INK 0,26,0:B0RDER 26,0;1NK l,3QtRND(a 
>,2b;PEN ItSTCED INK D. 5,0.5 
90 DRAM yKÛSi5MtRN0lb)),x»SINI50Q'RND( 
bl):z=;+5 

100 IF z)5000 ÏHEN G0IQ 130 
110 NEïT a 
120 NEXT b 

130 SOUND 129, LèOD.-32'DDD, U,0,0,0:S0UND 
130,I62O.-32QO0,I4,0,0,0:F0R a=l T0 360 
:QRIGIN 320,180;lNh 1,Û,26:PEN 3:DRAU 25 
0«CÛSU>,80iSlNla):NEXT a 
UO RUN 
150 REfl — Cest FINI: 708 octets ! — 



10 MODE DiPAPER B:E0RDEfi 22;r=lG0:l=0 

20 EVERÏ 300,0 GûSUE 370 

30 CLS:PEN 6:LÛCATE 4, 2: PRI NI 'Temps util 

40 PEN 7:L0CA1E 6, 7:PR1N1 'Temps iirajen 1 

5D PEU 9:L0CAIE 3,13:PRINT"Lettre5 a tap 

Bf' 

60 PEN 10:LOCAIE a.IfliPRlNT'Lettres lape 

70 FOR n=l 10 10:F0R 1*1 T0 IOOOsNEIT 

B0 t*=":a*="iHANKifflIE TIHE 

90 UH1LE LENUIX5 

100 p*=CHRtllNrtRNDi2fa)t65) 

110 t*=tt+p* 

120 UEND 

130 PEN 13:L0CATE B,15:PRINT tï 

140 L0CATE B,2D:PEN 1Q:PR1NT" ' 

150 a=TlHE 

160 L4HILE LENUIK5 

170 5*=UPPERt(lNKEYt> 

1B0 IF sïOMIDilti.LENUsM.l) THEN 170 

190 s**a**sl 

2D0 PEN LEN<à*):LQCATE 7*LENUJ),20:PRIN 

T st 

210 UEND 

220 PR1NT CHR$17I 

230 b=TIrtE 

240 Un> = (b/300l-' a/3001 

250 PEN 11:L0CATE 5,4:PRINT USING 'll.M 

#*it(n);:PRlNT* s.' 

260 t=0 

270 FOR j«J T0 n 

2B0 t=t+tC j> 

290 NEÏT 

300 PEN 12;L0CATE I0,9:PR1NT USING '«.I 

••■;t/n;:PRINÏ* s.* 

310 NEXT 

320 IF t<r TH£N r=t 

330 PEN 4:L0CATE 3,23:PR1NT*REC0RD , :PEN 

15:L0CATE 10,23:PR1NT U5ING , »*.tW,r/l 

0;:PRINT" s.':F0R b=1 T0 250:NEXT 

340 PRINT:PEN AïINPUT'ENCCUIE" ;ï* 

350 IF LEFT$(it,l)=V THEN 30 

360 EN0 

370 Ï0R0ER 1 : 1=1+1 : IF 1=27 THEN 1=0 

330 RETURN 



TELEPHONE 

Une ligne téléphonique est à 
votre disposition, vous mettant 
en contact direct avec la rédac- 
tion. Ceci est un service sans 
égal ! Respectez simplement les 
horaires et les jours que nous 
vous indiquons : 
MERCREDI de 9 h à 12 h et de 
14 h à 17 h. 

VENDREDI de 9 h à 12 h seule- 
ment. 

Tout appel en dehors de ces cré- 
neaux sera refoulé : ne dépensez 
pas inutilement votre argent I 
Le numéro : 99.52.98.11. 




INFORMATIQUE 

Micro ordmalaurt 



4 MAGASINS EN NORMANDIE 

22, Place du Général de Gaulle 

76800 LE HAVRE 

Tél.: 35.43.51.54 

39/41 Rue de l'Oratoire 

14000 CAEN 

Tél.: 31.86.16. 77 

31, Boulevard de la Marne 

76000 ROUEN 

Tél.: 36.07. 60«0 

1 1 , ru* du Perré 

61220 VIMOUTIERS 

Tél.: 33.39.16.65 



Transformez votre 464 en 664+ ! 
CARTE MÈRE - EXTENSION EPROM de Super Power 

La carte mère s'installe entre l'ordinateur et l'interface disquette (si celle-ci 
est utilisée). Elle peut accueillir jusqu'à 7 EPROMs (mémoire morte pro- 
grammable) de 8 ou 16K chacune. 

Les programmes en EPROM sont instantanément disponibles sur simple 
commande au clavier. La carte mère de construction robuste Bst d'utili- 
sation simple. Elle est accompagnée d'une notice en français. 

Programmes déjà disponibles en EPROM 

«■■■PB UTILITAIRE GESTION DE DISQUETTE SUPER POWER ■■■H 

Ce programme permet l'inspection et la modification des informations 
contenues sur 1 disquette. Un utilitaire essentiel pour récupérer les don- 
nées contenues dans une disquette défaillante. Chaque secteur peut 
être lu et réécrit, toutes les données peuvent être affichées ou impri- 

Le programme contient ausi un certain nombre de fonction utiles aux 
programmeurs en langage machine. 
Description : 

- Affichage du contenu du «directory» - édition possible 

- Lecture et écriture d'un secteur de disque - édition possible 

- Lecture des mémoires, possibilité d'édition, de copie et d'impression. 

- Dèsassemblage code entre adresse donnée, donnant adresse, code 
objet, mnémoniques, ASCII. 

- Recherche dans les secteurs fichiers, une chaîne (string) ou une série de 
codes HEX. 

- Formatage, duplication de disque sans CP/M. 

- Conversion HEX-BIN-DECIMAL. 

- Choix de mode d'affichage. 

- Etc.. 

f^^^H BOITE A OUTILS DE PROGRAMMATION f^^^Mj 
■iH + BASIC ETENDU SUPER POWER ^B 

Commandes directes 

Charcuter ; création de caractère utilisateur [affiche la ligne DATA) 
Compact: comprime un programme Basic 

Edîtor : Editeur à trois fenêtres 

Find/replace : cherche et remplace un coractère ou une chaîne 
Medlt : HEX éditeur et ASC II 

Picture : aide à la création des UDG 

Soundlab : éditeur d'enveloppe 

Xref : donne toutes les références d'une ligne (GOTO, 

GOSUB...) 

Commandes Imprimante 

Cdump : copie haute- résolution 

Echo on : sortie directe sur imprimante 

Echo off î LTRON - sortie TRACE sur imprimante 

Commandes graphiques 



Commandes d'écran 

Copychr : caractère double hauteur ou si 

Page-on : défilement verticol 

Page-otf : passage d'un écran o l'autre 



Commandes fichiers 

Baud: 

Info: 

Unprotact : 



choix de vitesse jusqu'à 4000 Baud 

donne adresse, longueur, adresse d'exécution 

charge un fichier «P» 



SEMAPHORE LOGICIELS 

c.p. 32 - CH-1 283 La Plaine (Suisse) Tél. 022/54 1 1 95 

Distribution & Services 

Avenue du Québec B.P. 209 91944 Les Ulis cedex 

Tél. 6/446 27 80 



"D" 

MAIL-MERG 



le texte des Amstrad avec 
aurnsuyc i.nOrpore. 
Fichier de travail porté à 22K sur 
464/664 et 64K sur le 61 28. 
Echange de données avec MASTERFILE 
(fichier) et MASTERCALC (tableur). 
Conversion de vos programmes TAS- 
WORD/AMSWORD 464 possible. (Ecri- 
vez-nous). 

TASWORD, TASPRINT, TASCOPY, SEMEXT 
MF, SEMEXT MC, Les outils sérieux de 
gestion de texte et données de chez 
SEMAPHORE ! 



Prix de lancement : 



Carte mère 

EPROM utilitaire disquette 
EPROM boîte à outils 
Carte mère + 2 EPROM 
Echecs disque 

cassette 
Ta s word 

Licence SUPER POWER de MICROPOWER 
Distribué en exclusivité par SÉMAPHORE 



I FS FF 

145 548 

145 548 

145 548 

400 1520 

65 235 

56 185 

90 345 
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DESCRIPTION 
DU PROGRAMME 

Règles du jeu : l'écran est divisé 
en cases, ou cellules ; chaque 



>*> 

Conservez vos ttnsoHes 

en las protégeant . 




NOM 

Prénom 

Coda Postal 

Villa 

Ci joint, chaqua bancalra ou postal da F. 

SORACOM 

Le Grand Logis — 10, Avenue du 
Général de Gaulle - 351 70 BRUZ 



case a 8 voisines. 
La vie apparaît dans une cellule 
ayant 3 (exactement) voisines 
vivantes ; une cellule survit si elle 
a 2 ou 3 voisines vivantes. Une 
cellule meurt si elle a moins de 2 
ou plus de 3 voisines vivantes. 
Le programme autorise jusqu'à 
24 lignes de 78 colonnes. 
Pour les limites de l'écran, on a 
le choix entre deux options : soit 
il n'y a pas de lien entre la pre- 
mière et la dernière ligne, et entre 
la première et la dernière colonne, 
soit la première ligne est considé- 
rée comme voisine de la dernière 
et de même la première colonne 
est rendue voisine de la dernière. 
On obtient une bonne compré- 
hension de ce deuxième cas en 
imaginant que le jeu se déroule, 
non pas sur un plan, mais sur un 
tore fermé (chambre à air de bicy- 
clette). 

La partie Basic fait appel à deux 
routines en code objet : 
— la routine &3200 met toutes 



les cellules à l'état mort et affi- 
che la grille initiale ; 
— la routine &30O0 réalise les 
fonctions suivantes : 
Calcul de l'état futur d'une cellule 
à partir de l'état actuel de ses 8 
voisines. Le calcul teste le bit 0, 
le résultat (1 =vie, mort] est 
stocké dans le bit 7 de l'octet 
associé à une cellule. 
Actualisation : après avoir ter- 
miné les calculs, il faut que l'état 
actuel soit remis à jour. Pour cela, 
le bit 7 (état futur) est recopié 
dans le bit (état actuel). 
Affichage :. pour gagner du 
temps, on n'affiche pas de point 
à l'emplacement des cellules 
mortes, car l'affichage prend plus 
de temps que les calculs. 
Bords : si on a choisi l'option pre- 
mière et dernière lignes (colon- 
nes) voisines, la routine bord 
introduit des lignes (colonnes) fic- 
tives ; ainsi, si on a 36 lignes, on 
ajoute une ligne et une ligne 
37 ; est la copie de la ligne 36, 
et 37 la copie de la ligne 1 . 

OCCUPATION MEMOIRE 

Les routines se trouvent de 
8,3000 à &3236. L'état des cel- 
lules est stocké de &4101 à 
&5940 (pour 24 lignes et 64 
colonnes). La première ligne 
{avec 64 colonnes) occupe les 
octets de &4101 à &4140. 

Pour conclure, signalons une 
structure intéressante : le "pla- 
neur". Pour des compléments sur 
le jeu de la vie, voir "POUR LA 
SCIENCE", août 1985. 




10 REM JEU DE LA VIE 

20 HEM PARTIE BASIC - 5 GAZAIX 1995 

30 REM 

40 REM 

50 KEY KF 50,0,S72,452,150:KEÏ DEF 62,0 

,163,143,151 

60 KEY 150, 'RUN 90*tCHM(131:KEY 151, *co 

ttt'«ORM13) 

70 MEMORY 429F0 



sa as 

90 INPUT 'surface férue I o/n ' .0» 

100 "c.'ijrgewrt code objet 

110 PRINT' CHARGEMENT DU CODE OBJET : AT 

TENDEZ •:P«INT:PRINT 

120 LOAD 'vieobjef 

130 INPUT "NOMBRE DE COLONNES'', N 

140 INPUT 'NOMBRE DE LIGNES î* ,NL 

150 INPUT 'durée d'une génération ,en s 

'V 

160 IF G*='n' T>€N POK£ 13Û22,0:P0KE *3C 

23,D:P0KE 13024,0 

170 DATA *3O10,*3O49,*3OA5, 1321F 

160 FOR 1=1 TO 4:READ V:P0KE v,N:NEXT 

1?0 POKE 430DB,N+2:POKE HDE6,Nt2 

2D0 POKE H20C.N+2 

210 RESTOfiE 220 

220 DATA 1300B,i3O«.,l3M:,l30B9.IKC7,L 

321B 

230 FOR 1=1 TO 6:READ V:P0KE V,NL:NEXT 

240 POKE 43209,102 

250 POKE 130BE,n:POKE ft3ÛC9,n+l :PÛK£ 130 

D6,141*nl:P0KE 430E4,44Q+nl 

260 IF n<=*0 THEN MODE 1 EUE «ODE 2 

270 BORDER 12 

280 HINDOU «,l,n*l,!,nl*l 

290 UINDOU 10,1.40,25,25 

300 HINDOU t5.1,N*l,NL*2,Nl*2 

31D WINDOU l4,N»2,N*2,l,NL+2 

320 FOR l«l TO nl+2:PRINT l*,CHRÏ(143>;: 



NEÏT 

330 FOR i=l TO n*t:PRINT t5,CHR*l 143) ;:N 

EUT 

3*0 'affichage écran et initialisation 

350 CALL 43200 

360 INK 2,1,26 

370 vS=CHfl* ( 22* ) : p*=' , ' t i t-' ? ' 

380 PRINT »0," Presser D pour comme 

ncer* 

390 'saisie de la configuration de depar 

t avec les touches du curseurrshift * eu 

rseur sert a effacer 

*00 LOCATE «,1,1:PR1NT #3. '''::k=1:u=1 

41D PRINT I3,CHR*(S); iTF n<41 THEN PEN 

13, 2 

*20 PRINT 13, lis: PEN 13,1 
*30 IF INKEV<01=0 AND VP0SII31OI THEN 
PRINT 13, ■■*■:.<; CHR$(I1); CHRt(B); 
v«;:G0SUl 550:GOSUÏ 530 :y*u-l 
4*0 IF INKEï(0)=32 AND VP0S<I3K>1 THEN 

PRINT *3,CHR((B);pt;CHRt(n); CHR*(B>; 

p*i:G0SUB 5B0: GOSUB 530:y=y-l 
450 IF INKE¥(2)=0 AND WOSIHKN. TIC 
N PRINT 13, CHRIiei; wf;CNR4U0)CHRI(8l 
ïv4;:60SUB 550:GOSUB 530:y=y*l 
460 IF INKEV(2)«32 AND VP05<I31 <H THEN 

PRINT §3, CHfl*fB>;pi; CHMUO>CHM(B!CH 
R*(46f;:G0SUB 5BB:G0SUB 530 :y=y*l 

470 IF INKEV(1)=0 AND P0SH3XN+1 THE 



N PRINT l3,CHRi(B);vt;v«;:G0SUB SSOtCOB 
UB 5X:*=»*i 

4B0 IF I*EV!I>=32 AND P0S!I3XN*1 THEN 
PAINT 13. CHRt(9);pt;pt::G0SUB 5B0:G0Sti 

B UOim+l 

49D IF INKEV(B!=0 AND P0S(»3)<>2 THEN 
PRINT «,CHRtO>f vS; CKRt(B)CHRHB); vï 
;:G0SUB 530:60SUB 550î«=x-l 
500 IF Ir*EY(fl)=32 AND P0SII31O2 THEN 
PRINT 13. CHR*(B);p«; CHM<eiCHRt<8);p*: 
:60SUB 5SO:GOSUB 330:i>t-l 

510 IF INKE¥I61)=0 THEN CLS 10: GOTO 610 

520 GOTO 410 

530 FOR 1«1 TO lOîNEïTiRETURN 

540 '*ise a jour de la case aenoire cor 

respOTidant a la cellule traitée 

550 • ■*-:■"" ■ .".:"':- 

560 POKE 1.129 

570 RETURN 

580 ■ =**000+yt4100+» 

59D POKE m,0 

600 RETURN 

610 REM appel du code objet :calculs et a 

f fichage 

620 PRINT M, 'ESC =STOP C =REPART* : 

630 'boucle principale 

6*0 tl=TIrE: CALL 13000 

650 IF TIME-tl ( 30D#T THEN GOTO 650 as 

E CLS «3 

660 GOTO 640 
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D'ECRAN 



Pascal H1GELIN 



In utilitaire de recopie d'écran est certainement 
I l'un des outils les plus demandés lorsqu'il fait 
' défaut sur le Basic de l'ordinateur. En voici un qui 
vous semblera complexe, mais qui présente l'avantage 
d'être quasi universel. Intégrant un SPOOLER (tampon 
permettant à {'ordinateur de travailler, même si l'im- 
primante n'est pas prête), il permet également de redé- 
finir des "trames" pour simuler différentes couleurs. 



Ce logiciel rajoute cinq nouvelles 
commandes au Basic- AMS- 
TRAD : 

I COPY : recopie d'écran haute 
résolution ou une partie de celui- 
ci sur imprimante. 
I COLOR : redéfinit la trame d'une 
pseudo-couleur. 

I PRINTER : reconfigure l'inter- 
face imprimante. 
I TEXTE : recopie l'écran ou une 
partie de celui-ci en mode texte 
sur l'imprimante. 
I SPOOLER : redéfinit les paramè- 
tres du spooler. 

Le caractère I correspond à SHIFT 
et(o> sur le clavier. 

MISE EN ROUTE 

Pour charger le programme en 
mémoire sans détruire un pro- 
gramme Basic qui s'y trouve déjà, 
faire : CHAIN MERGE " ". Vous 
pouvez également charger le pro- 
gramme par RUN " " mais, dans 
ce cas, un programme Basic déjà 
résident sera détruit. 



UTILISATION 

Reconfiguration de 
l'interface CENTRONICS 

IPRINTER.x.^bx^.. y,e,f,g,h,. 



x : peut prendre les valeurs de 
à 10 et correspond au nombre de 
codes à envoyer à l'imprimante 



10 et correspond au nombre de 
codes pour faire un retour à la 
ligne sur l'imprimante. 
e,f,g,h,... : y codes de retour à la 
ligne. 

m : peut prendre les valeurs 6 ou 
7, correspond au nombre de 
points verticaux de la tête d'im- 
pression de l'imprimante. 
p : nombre ajouté à chaque code 
graphique avant de l'envoyer à 
l'imprimante {nécessaire sur cer- 
taines imprimantes). 
q : peut prendre les valeurs ou 
1 : la valeur 1 correspond aux 
imprimantes qui, en mode graphi- 
que, ont le bit de poids faible en 
bas, la valeur correspond à cel- 
les dont le bit des poids faible est 
en haut. 

Exemple : Imprimante CENTRO- 
NICS 154 en mode graphique 6 
points. 



nombre a rajouter 



IPRINTER.3.&ie,&25.&30, 



3.&1B,&25.&3O.1.&0A, 6.32,0 

,, p~rn * 

" T bit de poids fai 

I I nombres de po 

I —codes de retou 



codes de retour chariot 
nombre de codes de retour chariot 
codes de mise en mode graphique 
nombre de codes de mise en mode graphiqui 



pour la mettre en mode graphi- 
que. 

a,b,c,d,... : x codes de mise en 
mode graphique, 
y : peut prendre les valeurs à 



Exemple 
IDP 560 



Imprimante CITIZEN 



IPHINTER.4,&1B,&4B, 100,01, 1,1 3, 7,0.1 
Codes pour une largeur de 100 points. 



Recopie d'écran graphique 

ICOPY,a,b,c,d,e,f 

a : doit être compris entre et 
640, coordonnée graphique de la 
gauche de la fenêtre à imprimer, 
b : doit être compris entre et 
640, coordonnée graphique de la 
droite de la fenêtre à imprimer, 
c : doit être compris entre et 
400, coordonnée graphique du 
haut de la fenêtre à imprimer, 
d : doit être compris entre et 
400, coordonnée graphique du 
bas de la fenêtre à imprimer, 
e : peut prendre les valeurs ou 1 

: demi-largeur (320 points 
maxi) 

1 : largeur normale (640 points 
maxi). 

f : peut prendre les valeurs ou 
1. 

: hauteur normale (400 points 
maxi). 

1 : double hauteur (800 points 
maxi). 

Exemple : 

ICOPY, 0,640,400, 0,1,1 
Recopie d'écran tout entier en 
double hauteur. 



Redéfinition 

d'une pseudo-couleur 

Pour pouvoir représenter sur l'im- 
primante les différentes couleurs 
de l'écran, cette instruction per- 
mettra d'associer à chaque 
numéro de couleur de l'écran une 
pseudo-couleur représentée par 
une trame dans une matrice de 
8x8. 
ICOLOR,a,b,c,d,e,f,g,h,i 

a : numéro de la pseudo-couleur 
à définir. 



b à j 
trame. 

Exemple 



octets représentant la 



ICOLOR,0,1,2,4,8,16,32,64,128 



J 



0000000 

00000010- 

00000100- 

00001000- 

00010000- 

00100000- 



01000000- 
1 0000000. 



Dans ce cas, la pseudo-couleur 
(couleur du fond) sera une 
hachure. 

Recopie de texte 

a : doit être compris entre 1 et 80 

(mode 2), coordonnée gauche de 

la fenêtre à imprimer. 

b : doit être compris entre 1 et 80 

(mode 2), coordonnée droite de 

la fenêtre à imprimer. 

c : doit être compris entre 1 et 

25, coordonnée du haut de la 

fenêtre à imprimer. 

d : doit être compris entre 1 et 

25, coordonnée du bas de la 

fenêtre à imprimer. 

Exemple : ITEXT, 1,40, 1,25 
Recopie tout l'écran en mode 
texte sur l'imprimante (mode 1 ). 
Si un caractère n'est pas 
reconnu, il sera remplacé par un 
espace. 

Reconfiguration 
du spooler 

Le spooler est une mémoire tam- 
pon qui est remplie à la place 
d'envoyer les caractères à l'impri- 



mante. Un second programme 
vide le spooler toutes les 1 /50 e 
de seconde, donc on n'est plus 
obligé d'attendre l'imprimante. 

ISPOOLER,a,b,c 

a : adresse du début du spooler, 
par défaut : &9C30 
b : adresse de fin du spooler, par 
défaut : &A400 
c : nombre de tentatives de sor- 
tie d'un, caractère sur l'impri- 
mante par 1/50 e de seconde. 
Le spooler ne se protège pas lui- 
même : avant de faire, par exem- 
ple, ISPOOLER,&9000,&A400,8 
on fait MEMORY &9000 pour le 
protéger. Si on change de taille 
du spooler, celui-ci est vidé. Le 
spooler sera également utilisé par 
le Basic avec les instructions : 
PRINT #8 et LIST #6. 

REMARQUES GENERALES 

Dans le cas où le nombre de para- 
mètres des instructions est incor- 
rect ou que ces paramètres ne 
sont pas dans la plage indiquée, 
l'instruction sera ignorée. 
Pour modifier les paramètres par 
défaut des différentes instruc- 
tions, vous pouvez sauvegarder 
urle version du programme avec 
les paramètres choisis : ce seront 
les nouveaux paramètres par 
défaut. 

L'AMSTRAD, par sa construc- 
tion, ne peut envoyer que des 
octets ayant le bit 7 à 0, donc si 
vous envoyez un code supérieur 
à 128, il lui sera retranché 128, 
ceci est également valable pour 
les codes de contrôle pour pas- 
ser en mode graphique. L'utilisa- 
tion d'une imprimante à mode 
graphique 8 points entraînera que 
la première ou la dernière ligne 
graphique sera vide. 



Lignas 100 à 170 


Lignes 470 à 570 


Table de» sous-programmes du moniteur utilisé dans le 


Table des instructions supplémentaires. 


programme. 


Lignes 590 à 680 


Lignes 210 à 230 


Cette routine est appelée 50 fois par seconde. Elle tente 


Branche l'extension du Basic (RSX). 


de vider le spooler. 


Lignes 240 à 310 




Recopie des jumpblocks de IMPR et BUSY (IMPR et BUSY 


INSTRUCTION COPY 


sont déviés à cause du spooler). 




Lignes 420 à 460 


Lignes 700 6 710 


Table de sauts. 


Il faut 6 paramétres. 
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Lignas 720 à 890 
Récupère les paramètres. 
Lignes 910 à 1020 
Teste la validité des paramètres. 
Lignes 1040 à 1070 
Début de page. 
Lignes 1080 à 1090 

Début de ligne : envoi d'un saut de ligne puis des codes 
de passage en mode graphique. 
Lignes 11 00 à 1150 
Initialisation pour un octet. 
Lignes 1160 à 1270 

Teste un point, applique le masque de la couleur. Si le 
point est en-dehors de la fenêtre, ii est éteint. 
Lignes 1280 à 1300 

Fait rentrer le nouveau point dans l'octet. 
Lignes 1310 à 1410 
Teste le pas de la fenêtre. 
Lignes 1420 à 1480 

Descend d'un point en simple hauteur, d'un demi-point 
en double hauteur. 
Ligne 1490 

Recommence pour chaque point. 
Lignes 1 500 à 1 570 

Fait tourner l'octet pour placer les points correctement. 
Lignes 1 580 à 1 590 
Met l'octet dans le spooler. 
Lignes 1 600 à 1 660 
Teste la fin de ligne. 
Lignes 1670 à 1750 

Avance de deux points en demi-largeur et d'un point 
en largeur normale. Saut pour l'octet suivant. 
Lignes 1760 à 1970 
Descend d'une ligne. 
Lignes 1880 à 1890 
Début de ligne. 
Lignes 1900 à 1920 
Teste le bas de la fenêtre. 
Ligne 1930 

Recommence une autre ligne. 
Lignes 1950 à 1960 

Saut de ligne, puis rend la main au Basic. 
Lignes 1980 a 2080 

Lit le nombre d'octets à envoyer dans TABLE puis envoie 
les n codes de TABLE. 
Lignes 2100 à 2200 

Lit le nombre d'octets à envoyer dans TABLE 1 puis 
envoyé les n codes de TABLE 1 . 
Lignes 2220 à 2280 

Détermine la position de la table de la couleur conte- 
nue dans A. 
Lignes 2290 à 2390 

En fonction de Y et de l'agrandissement vertical, on 
prend l'octet correct parmi les 8. 
Lignes 2540 à 2590 
Sort A sur le spooler. 
Lignes 2610 à 2630 
Correction puis sortie sur le spooler. 

INSTRUCTION COLOR 

Lignes 2650 à 2660 
Il faut 9 paramètres. 
Lignes 2670 à 2730 

Calcule la position dans la table des couleurs en fonc- 
tion du numéro de couleur. 
Lignes 2740 à 2830 
Transfère les 8 octets dans la table des couleurs. 

INSTRUCTION PRINTER 

Lignes 2850 à 2960 

Calcule la longueur du buffer d'entrée et la position du 

début. 



Lignes 2970 à 2980 

Maximum 10 codes de graphiques. 

Lignes 2990 à 3090 

Passe à la rubrique suivante. 

Lignes 3100 à 3110 

Maximum 10 codes de retour à la ligne. 

Lignes 3120 à 3210 

Passe à la rubrique suivante. 

Lignes 3220 à 3250 

6 ou 7 points autorisés. 

Lignes 3260 à 3300 

Teste le nombre de paramètres. 

Lignes 3310 à 3400 

Range les codes de passage en mode graphique dans 

TABLE. 

Lignes 3410 à 3490 

Range le nombre de points de l'imprimante (6 ou 7) et 

le code à ajouter à chaque caractère. 

INSTRUCTION TEXTE 

Lignes 3580 à 3690 

Il faut 4 paramètres. 

Lignes 3600 è 3890 

Teste la validité des paramètres. 

Lignes 3900 à 4)930 

On commence dans le coin en haut et à gauche. 

Lignes 3940 à 4030 

Teste tous les caractères d'une ligne, si le caractère 

n'est pas reconnu, on met un blanc. 

Lignes 4040 à 4110 

Saut de ligne, on récupère les paramètres pour une 

nouvelle ligne. 

INSTRUCTION SPOOLER 

Lignes 4130 à 4140 

Il faut 3 paramètres. 

Lignes 4150 à 4280 

Récupère les adresses de début et fin de spooler et les 

teste. 

Lignes 4290 à 4360 

Range les adresses de début et de fin, vide le spooler 

et range le nombre d'essais effectués par 1/50* de 

seconde pour envoyer un caractère à l'imprimante. 

Lignes 4380 à 4460 

Indique s'il y a de la place dans le spooler. 

Lignes 4480 6 4700 

Range un caractère dans le spooler s'il y a de la place, 

sinon attend qu'il y ait de nouveau de la place. 

Lignes 4720 à 5050 

Routine d'interruption : tente d'envoyer les caractères 

du spooler sur l'imprimante. 

Lignes 5070 à 5080 

Copie des jump blocks de IMPR et BUSY. 

Lignes 5100 à 5130 

Sauts qui remplacent IMPR et BUSY. 

Lignes 5150 à 5340 

Variables. 

Lignes 5360 à 5540 

Table des couleurs. 

Pour faire une copie d'écran avec l'Imprimante AMS- 
TRAD DMP1, on a intérêt à utiliser la séquence sui- 
vante : 

GAUCHE, DROITE, HAUT, BAS sont les limites de la fenê- 
tre à imprimer. 

DLARO et DHAUT sont les codes de double hauteur ou 
demi-largeur et peuvent valoir ou 1 . 

1 L = (DROITE- GAUCHE + 1 )/(2 - DLARO) 

2 I PRINTER,4,27,75,L\128,LMOD 128,1,10,7,0,0 

3 I COPY,GAUCHE,DROITE,HAUT,BAS,DLARG,DHAUT. 
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Hisoft GENA3.1 Assembler. Page 1. 
Pass 1 errors: 00 



BEFO 
BD2B 
BD2E 
BCDI 
BB72 
BE6F 
BB60 
BCD7 

9A00 

9A0O 
9A03 
9A06 
9A09 
9A0C 
9A0F 
9A12 
9A14 
9A17 
9A1A 
9A1D 
9A1F 
9A22 
9A25 
9A28 
9A2A 
9A2D 
9A30 
9A33 
9A35 
9A3S 
9A3A 
9A3C 
9A3F 
9A42 

9A43 
9A4C 
9A50 
9A52 
9A55 
9A5S 
9A5E 
9A5E 
9A61 
9A64 
9A65 
9A69 
9A6A 
9A70 
9A71 
9A74 
9A75 
9A7B 
9A7C 



01509A 

214C9A 

CDD1EC 

212EBD 

liD39D 

010300 

EDBO 

21D69D 

112BD 

010300 

EDBO 

212EBD 

11D09D 

010300 

EDBO 

21D99D 

112BBD 

010300 

EDBO 

21439A 

0681 

0E00 

117D9A 

CDD7BC 

C9 



619A 

C3899A 

G13ÇC 

C3379C 

C3E39C 

C3239D 

434F50 

D9 

434F4C4F 

D2 

5052494E 

D2 

544553 

D4 

53504F4F 

D2 

00 



100 TEST 

110 IMPR: 

12,0 EUSY; 

130 LINK; 

140 ROU: 

150 COLUMN; 

160 SCREEN 

170 FRAME: 

180 

190 

200 

210 DEBUT: 

220 

230 

231 

232 

233 

234 

240 

250 

260 

270 

271 

272 

273 

274 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 ELOCK: 

400 EUFFER: 

410 COMTAE: 

420 

430 

440 

450 

460 

470 NMETAE: 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 



EQU IBEFO 
EQU, IBD2B 
EQU* IBD2E 
EQU #BCD1 
EQU IBB72 
EQU «BB6F 
EQU IEB60 
EQU #BCD7 

ORG I9A00 

LD BC.COfITAB 
LD HL.BUFFER 
CALL LINK 
LD HL.EUSY 

DE.EUSïl 

BC,3 



LD 

LD 

LDIR 

LD 

LD 

LD 

LDIR 

LD 

LD 

LD 

LDIR 

LD 

LD 

LD 

LDIR 

LD 

LD 

LD 

LD 



HL.BUSY2 
DE. EUSY 
BC.3 

HL.IMPR 
DE, IMPR1 
BC.3 

HL. IMPR2 

DE. IMPR 
BC.3 

HL.BLOCK 
B.Ï10000001 
CD 
DE.INTER 



CALL FRAME 
RET 



DEFS 
DEFS 



JP 
JP 

JP 
JP 
DEFM 



DEFW NMETAE 
JP COPY 
COLOR 
PRINTE 
TEXT 
SPOOL 
COP" 
DEFE 'Y'+ISO 
DEFM *COLO" 
DEFE ^"+#80 
DEFM 'PRINTE 1 
DEFE " R"+#8Q 
DEFM 'TEX' 
DEFE 'J'HeO 
DEFM 'SPCCLE' 
DEFE 'R'+itSO 
DEFE 
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9A7D 
9A7E 
9A7F 
9A80 
9A81 
9A84 



C5 

D5 

E5 

F5 

CD8B9D 

FI 



580 

590 INTER: 

600 

610 
620 
630 
640 



PUSH BC 
PUSH DE 
PUSH HL 
PUSH AF 
CALL VIDE 
POP AF 



; COULEUR DU POINT X=DE.Y=HL DANS A 
;SORTIE DE A SUR IMPRIMANTE.BIT 7 = 
iTESTE SI L'IMPRIMANTE EST OCCUPEE 
;BRANCHEMENT DE L'EXTENSION DU BASIC 
; CURSEUR SUR LA LIGNE A 
iCURSEUR SUR LA COLONNE A 
iCODE CARACTEFE SOUS LE CURSEUR DANS A 
(BRANCHE LE SPOOLER 



9A85 El 

9A86 Dl 

9A87 Cl 

9A88 C9 



9A89 
9A8B 
9A8C 
9A8F 
9A92 
9A95 
9A98 
9A9B 
9A9E 
9AA1 
9AA4 
9AA7 
9AAA 
9AAD 



FE06 

CO 

DD6E0A 

DD660E 

22FA9D 

DD6E06 

DD6607 

22FE9D 

DD6E08 

DD6609 

22FC9D 

DD6E04 

DD6605 

22009E 



9AÎ0 DD7ED2 

9AB3 320A9E 

9AE6 DD7E00 

9AE9 320E9E 

9AEC 2AFC9D 

9ABF ED5EFA9D 

9AC3 37 

9AC4 3F 

9AC5 ED52 

9AC7 D8 

9AC8 2AFE9D 

9ACB ED5E009E 

9ACF 37 

9AD0 3F 

9AD1 ED52 

9AD3 DB 



9AD4 
9AD7 
9ADA 
9ADD 
9AE0 
9AE3 
9AE6 
°4E9 
9A£A 
9AEB 
9AED 
9AF0 



2AFA9D 

22029E 

2AFE9D 

22049E 

CDA99E 

CDEA9B 

3A089E 

47 

4F 

3E00 

32099E 

32069E 



650 

660 

670 

680 

690 

700 COPY: 

710 

720 

730 

740 

750 

760 

770 

730 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 
■ 930 

940 

950 

960 

970 

980 

990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 

1080 LIGNE: 
1090 

1100 OCTET: 
1110 
1120 
1130 
1140 
115C 



POP HL 

POP DE 

POP EC 
RET 



CP 

RET 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 

LD 
LD 



6 

NZ 

L. (IX+10) 

H,(IX+U) 

<X_DEÎ),HL 

L.UX+6) 

H, (IX+7) 

(Y.DEE).HL 

L.âx+8) 

H,(IX+9) 

(X.FIN).HL 

L,IlX+4) 

H,(IX+5) 

<Y_FIN),HL 

A,(IX+2) 
(SIZEJ).A 



LD A. (IX+O) 
LD (SIZE_Y),A 



LD 

LE 

SCF 

CCF 

SBC 

RET 

LD 

LD 

SCF 

CCF 

SEC 

RET 



HL. (X_FIN) 
DE. (X DEE) 



HL,DE 

C 

HL, (YJ)EE) 

DE, (Y_FIN) 



HL.DE 
C 



LD HL,(X_DEB) 
LD <X),HL 
LD HL.IY DEE) 
LD (Y),HL 
CALL CR 
CALL CODES 
LD A, (POINTS) 

B.A 

C.A 

A,0 

(FLAG).A 

(BYTE), A 



9AFA 
9AFD 
9AFF 
9E01 
9E02 
9E03 
9E05 
9E06 
9E09 
9B0C 
9B0D 
9B10 
9E11 
9B14 
9E17 
9B1B 
9B1C 
9B1D 
9B1F 
9B21 
9B22 
9B24 
9B26 
9B28 
9E2B 
9B2E 
9B2F 
9B32 
9E34 
9E36 
9E37 
9E3A 
9B3C 
9B3F 
9B41 
9E43 
9E45 
9B46 
9B47 
9B4A 
9E4E 
9B4C 
9B4E 
9B50 
9B53 
9B56 
9B5A 
9B5D 
9B5E 
9E5F 
9B61 
9E63 
9B65 
9B66 
9B69 
"E6B 



3A099E 

FE01 

2004 

37 

3F 

1808 

C5 

CDFOEB 

CDCE9B 

Cl 

3A069E 

IF 

32069E 

2A049E 

ED5B009E 

37 

3F 

ED52 

3805 

7C 

FEFF 

2005 

3E01 

32099E 

2A049E 

2B 

3A0B9E 

FEOO 

2001 

2Î 

22049E 

10B7 

3A079E 

FEOO 

200D 

3E08 

91 

47 

21069E 

37 

3F 

CE1E 

10FA 

3A069E 

CD0D9C 

ED5E029E 

2AFC9D 

37 

3F 

ED52 

2818 

3816 

13 

3A0A9E 

FEOO 

2001 



1180 

1190 

1200 

1210 

1220 

1230 

1240 SUITE: 

1250 

1260 

1270 

1280 TOURNE: 

1290 WRAP: 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 FIN: 

1410 

1420 CONT: 

1430 

1440 

1450 

1460 

1470 

1480 SAUT: 

1490 

1500 

1510 

1520 

1530 

1540 

1550 

1560 

1570 L00P1: 

1580 

1590 

1600 

1610 SAUT7: 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 



A.(FLAS) 

1 

NZ. SUITE 
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9AF3 2A049E 
9AF6 ED5E029E 



1160 LOOP: 
1170 



LD 
LD 



HL, (Y) 
DE. (X) 



9B6D 
9B6E 
9B72 
9B75 
9B78 
9B7B 
9B7E 
9B/F 
9E82 
9BS4 
9ES6 



13 

ED53029E 

2AFE9D 

22049E 

C3E69A 

3A089E 

4F 

3A0B9E 

FEOO 

2002 

CB21 



1740 

1750 SAUT3: 

1760 

1770 

1780 

1790 SUIVAN: 

1800 

1810 

1820 

1830 

1840 



A, (BYTE) 

(BYTE), A 
HL,(Y) 
DE. (Y FIN) 



LD 

CP 

JR 

SCF 

CCF 

JR TOURNE 

PUSH BC 

CALL TEST 

CALL EVAL 

POP BC 

LD 

RRA 

LD 

LD 

LD 

SCF 

CCF 

SEC 

JR 

LD 

CP 

JR 

LD 

LD 

LD 

DEC 

LD 

CP 

JR 

DEC 

LD 



HL.DE 

C.FIN 

A,K 

«FF 

NZ.CONT 

A,l 

(FlAG).A 

HL, (Y) 

HL 

A,(SIZE.Y) 



NZ,SAUT 

HL 

(Y),HL 
DJNZ LOOP 
LD A, (SENS) 



NZ.SAUT7 

A. 3 

C 

B.A 

HL.BYTE 



CP 

JR 

LD 

SUB 

LD 

LD 

SCF 

CCF 

RR (HL) 

DJNZ L00P1 

LD A. (BYTE) 

CALL CARAC 

LD DE.(X) 

LD HL,(X_FIN 

SCF 

CCF 

SBC 

JR 

JR 

INC 

LD 

CP 

JR 



HL.DE 

Z. SUIVAN 

C. SUIVAN 

DE 

A,(SIZE.X) 



NZ.SAUT3 
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INC 

LD 

LD 

LD 

JP 

LD 

LD 

LD 

CP 

JR 

SLA 



DE 

(X),DE 

HL,(Y_DEÏ> 

(Y),HL 

OCTET 

APPOINTS) 

C,A 

A,(SIZE.Y) 



NZ,SAUT1 

C 



42 



9188 


0600 


1850 SAUT1: 


LD 


B.O 


9BFF 


OA 


2520 


INC B 


9C66 


1600 


3190 


LD 


D.O 


9EBA 


2AFE9D 


1660 


LD 


HL.IY.DES) 


9CO0 


CB11 


2530 L00P5: 


RI C 


9C68 


37 


3200 


SCF 




9B9D 


37 


1370 


SCF 




9C02 


10FC 


25 AO 


DJNZ L00P5 


9C69 


3F 


3210 


CCF 




9E8E 


3F 


1880 


CCF 




9C0A 


C9 


2550 


RET 


9C6A 


ED52 


3220 


SBC 


HL.DE 


9B8F 


EDA2 


1890 


SEC 


HL.EC 






2560 




9C6C 


A7 


3230 


LD 


M 


9B91 


22FE9D 


1900 


LD 


(V.DEîi.HL 


9C05 


E5 


2570 PRINT: 


PUSH HL 


9C6D 


7E 


3240 


LD 


A, (HL) 


9B94 


2AFA9D 


1910 


LD 


wJlX.DEB) 


9CC6 


C5 


2580 


PUSH BC 


9C6E 


FE06 


3250 


CP 


6 


9B97 


22029E 


1920 


LD 


(X),HL 


9C07 


CD2BBD 


2590 


CALL IMPR 


9C70 


D8 


3260 


RET 


C 


9B9A 


3A099E 


1930 


LD 


A.(FUG) 


9C0A 


Cl 


2600 


POP BC 


9C71 


FE08 


3270 


CP 


8 


9B9D 


FE01 


19A0 


CP 


1 


9C0B 


El 


2610 


POP HL 


9C73 


DO 


3280 


RET 


NC 


9B9F 


CAA59B 


1950 


JP 


Z. RETOUR 


9C0C 


C9 


2620 


RET 


9C7A 


78 


3290 


LD 


A.B 


9BA2 


C3E09A 


1960 


JP 


LI9E 






2630 




9C75 


D603 


3300 


SUE 


3 






1970 






9C0D 


C620 


26A0 CARAC: 


ADD A. #20 


9C77 


CO 


3310 


RET 


NZ 


9BA5 


CDA99B 


1990 RETOUR 


CALL CR 


9C0F 


CD059C 


2650 


CALL PRINT 


9C79 


2A0C9E 


3320 


LD 


HL.(ADDR) 


9BA8 


C9 


1990 


RET 




9C12 


C9 


2660 


RET 


9C7B 


A6 


3330 


LD 


B.(HL) 






2000 










2670 




9C7C 


OA 


33A0 


INC 


B 


9BA9 


21DC9D 


2010 CR: 


LD 


KL, TABLE 


9C13 


FE09 


2680 COLOR: 


CP 9 


9C7D 


11E79D 


3350 


LD 


DE.TABLE1 


9BAC 


A4 


2020 


LD 


B,(HL) 


9C15 


CO 


2690 


RET NZ 


9CB0 


7E 


3360 L00P6: 


LD 


A.IHL) 


9BAD 


78 


2030 


LD 


A,B 


9C16 


DD6E10 


2700 


LD L, (IX+16) 


9C81 


12 


3370 


LD 


(DE), A 


9EAE 


FEOO 


20A0 


CP 





9C19 


CB25 


2710 


SLA L 


9C82 


2E 


3380 


DEC 


HL 


9BB0 


C8 


2050 


RET 


Z 


9C1B 


CE25 


2720 


SLA L 


9C83 


2Î 


3390 


DEC 


HL 


9BB1 


23 


2060 


INC 


HL 


9C1D 


CE25 


2730 


SLA L 


9C8A 


13 


3400 


INC 


DE 


9BE2 


7E 


2070 L0OP2: 


LD 


A.(HL) 


9C1F 


2600 


27A0 


LD H.O 


9C85 


10F9 


3410 


DJNZ L00P6 


9BB3 


CD059C 


20S0 


CALL 


PRINT 


9C21 


110E9E 


2750 


LD DE.COULE'J 


9C87 


A6 


3420 


LD 


B.(HL) 


9EE6 


23 


2090 


INC 


HL 


9C2A 


19 


2760 


ADD HL.DE 


9C88 


OA 


3A30 


INC 


B 


9EB7 


10F9 


2100 


DJNZ 


L00P2 


9C25 


DD220C9E 


2770 


LD (ADDR).IX 


9C89 


11DC9D 


3AA0 


LD 


DE. TABLE 


9BE9 


C9 


2110 


RET 




9C29 


ED5E0C9E 


2780 


LD DE.IADDR) 


9C8C 


7E 


3450 L00P7: 


LD 


A.tHL) 






2120 






9C2D 


0608 


2790 


LD B.8 


9CBD 


12 


3460 


LD 


(DE), A 


9EBA 


21E79D 


2130 CODES: 


LD 


HL.TAELE1 


9C2F 


1A 


2800 BOUCLE 


LD A, (DE) 


9CBE 


2E 


3A70 


DEC 


HL 


9BBD 


A4 


2140 


LD 


B.(HL) 


9C30 


77 


2810 


LD (HL).A 


: mMM 




SSS^^ÎSgSJS 




S;&SHSS;SS. : ! 


9BBE 


78 


2150 


LD 


A,B 


9C31 


13 


2820 


INC DE 


ÊsiyfsH 








llliillllil 


9EEF 


FE00 


2160 


CP 





9C32 


13 


2830 


INC DE 












9BC1 


C8 


2170 


RET 


Z 


9C33 


23 


2840 


INC HL 
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7. 


9EC2 


23 


2180 


INC 


HL 


9C34 


10F9 


2850 


DJNZ BOUCLE 












9BC3 


7E 


2190 LOOP3: 


LD 


A, (HL) 


9C36 


C9 


2860 


RET 












9BM 


CDÛ59C 


2200 


CALL 


PRINT 






2870 




9C8F 


2B 


3480 


DEC 


HL 


9EC7 


23 


2210 


INC 


HL 


9C37 


6F 


2880 PRINTE 


LD L.A 


9C90 


13 


3490 


INC 


DE 


9EC8 


1CF9 


2220 


DJNZ L00P3 


9C38 


CE25 


2890 


SLA L 


9C91 


10F9 


3500 


DJNZ L00P7 


9BCA 


C9 


2230 


RET 








: : : : :;:'H::::::::: : : : : ; : : : : : : : : :W:> 


iW^iiiiliiii-: 


9C93 


7E 


3510 


LD 


A.(HL) 






22 AO 














9C9A 


32C89E 


3520 


LD 


(POINTS). A 


9BCB 


210E9E 


2250 EVAL: 


LD 


a.COULEU 










9C97 


2B 


3530 


DEC 


HL 


9BŒ 


1600 


2260 


LD 


D,0 
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9C98 


2E 


3540 


DEC 


HL 


9BD0 


5F 


2270 


LD 


E.A 










9C99 


7E 


3550 


LD 


A,(HL) 


9ED1 


CB23 


2280 


SLA 


E 










9C9A 


320E9C 


3560 


LD 


(CARAC+D.A 


9BD3 


CE23 


2290 


SLA 


E 


9C3A 


2D 


2900 


DEC L 


9C9D 


2B 


3570 


DEC 


HL 


9BD5 


CB23 


2300 


SLA 


E 


9C3B 


2D 


2910 


DEC L 


9C9E 


2E 


3590 


DEC 


HL 


9ED7 


19 


2310 


ADD 


HL,DE 


9C3C 


2600 


2920 


LD H.O 


9C9F 


7E 


3590 


LD 


A.(HL) 


1PP 


:i:::j:;:i:i:K|:::::::::;:: 






rîi{:r;££jr^:-:^?^:::^ : ::::- : :::::ir^::£=îi:îr=i-: 


9C3E 


DD220C9E 


2930 


LD (ADDR).IX 


9CA0 


32079E 


3600 


LD 


(SENS), A 




;:;:;:;:;:j:|:;:;:;:;: ; :;:::o 






SpSilsSi;:; 


9C42 


ED5E0C9E 


2940 


LD DE.IADDR) 


9CA3 


FEOO 


3610 


CP 





ïisiïssi 


■i-^ii^SSJfiJÎÎJâ 


9CA6 


19 


2950 


ADD HL.DE 


9CA5 


2806 


3620 


JR 


Z.SAUT6 


Hisoft GENA3.1 


Asseebler. Page 


5. 


9C47 


220C9E 


2960 


LD (ADDR).HL 


9CA7 


3E17 


3630 


LD 


A. 117 












9C4A 


5E 


2970 


LD E.(HL) 


9CA9 


32109B 


3640 


LD 


(HRAP),A 












9CAB 


4F 


2980 


LD C,A 


9CAC 


C9 


3650 


RET 




9BD8 


ED5B049E 


2320 


LD 


DE.(Y) 


9CAC 


7B 


2990 


LD A.E 


9CAD 


3E1F 


3660 SAUT6: 


LD 


A.tlF 


9BDC 


3A0B9E 


2330 


LD 


A,(SIZE_Y) 


9CAD 


FEOB 


3000 


CP 11 


9CAF 


32109B 


3670 


LD 


<URAP),A 


9BDF 


FEOO 


23A0 


CP 





9CAF 


DO 


3010 


RET NC 


9CB2 


C9 


3680 


RET 




9EE1 


2002 


2350 


JR 


NZ.SAUT2 


9C50 


79 


3020 


LD A.C 






3690 






9EE3 


CE2E 


2360 


SRA 


E 


9C51 


1C 


3030 


INC E 


9CE3 


FE04 


3700 TEXT: 


CP 


A 


9BE5 


1600 


2370 SAUT2: 


LD 


D.O 


9C52 


93 


3040 


SUB E 


9CE5 


CO 


3710 


RET 


NZ 


9EE7 


3E07 


2380 


LD 


A, #7 


9C53 


CB23 


3050 


SLA E 


9CE4 


DD7E06 


3720 


LD 


A,(IX+6) 


9EE9 


A3 


2390 


AND 


C 


9C55 


1600 


3060 


LD D.O 


9CE9 


FED1 


3730 


CP 


1 


9EEA 


5F 


2AOO 


LD 


E.A 


9C57 


37 


3070 


SCF 


9CEB 


D8 


3740 


RET 


C 


9BEE 


19 


2410 


ADD 


HL,DE 


9C58 


3F 


3080 


CCF 


9CBC 


32FA9D 


3750 


LD 


(X_DEB),A 


9BEC 


7E 


2A20 


LD 


A,(HL) 


9C59 


ED52 


3090 


SBC HL.DE 


9CEF 


DD7E02 


3760 


LD 


A.UX+2) 


9EED 


AF 


2A30 


LD 


C,A 


9C5B 


5E 


3100 


LD E,(HL) 


9CC2 


FE01 


3770 


CP 


1 


9BEE 


ED5B029E 


2AAO 


LD 


DE. (X) 


9C5C 


AF 


3110 


LD C.A 


9CCA 


D8 


37B0 


RET 


C 


9EF2 


3A0A9E 


2A50 


LD 


A, (SIZE X) 


9C5D 


7B 


3120 


LD A,E 


9CC5 


32FE9D 


3790 


LD 


<YJ)EB),A 


9EF5 


FEOO 


2A60 


CP 





9C5E 


FEOB 


3130 


CP 11 


9CC3 


DD7E0A 


3800 


LD 


A,IlX+4) 


9EF7 


2002 


2A70 


JR 


NZ, SAUTA 


9C60 


DO 


3140 


RET NC 


9CCB 


FE51 


3810 


CP 


81 


9BF9 


CB3B 


2A80 


SRL 


E 


9C61 


79 


3150 


LD A,C 


9CCD 


DO 


3820 


RET 


NC 


9EFB 


3E07 


2A90 SAUT4: 


LD 


A. #7 


9C62 


1C 


3160 


INC E 


9CCÉ 


32FC9D 


3830 


LD 


(X_FIN).A 


9BFD 


A3 


2500 


AND 


E 


9C63 


93 


3170 


SUB E 


9CD1 


DD7E00 


3840 


LD 


A.ax+o) 


9BFE 


A7 


2510 


LD 


B.A 


9C64 


CE23 


3180 


SLA E 


9CDA 


FE1A 


3850 


CP 


26 



43 



9CD6 DO 


3860 


RET NC 


9D63 


C9 


4580 


RET 


9DD7 559D 5230 DEFW BUSY3 


9CD7 32009E 


3870 


LD (Y.FIN).A 






4590 




9DD9 C3 5240 IMPR2: DEFB #C3 


9CDA 3AFE9D 


3eeo 


LE A.(Y.DEE) 


9D64 


37 


4600 IMPR3: 


SCF 


9DDA 649D 5250 DEFW IMPR3 


9CDD 4F 


3890 


LD C.A " 


9D65 


F5 


4610 


PUSH AF 


5260 


9CDE 3A009E 


3900 


LD A.(Y.FIN) 


9D66 


C5 


4620 


PUSH BC 


9DDC 010AOOOO 5270 TAELE: DEFB 1,10.0.0,0,0, 


9CE1 91 


3910 


SUE C 


9D67 


D5 


4630 


PUSH DE 


5280 O.O.C.0,0 


9CE2 D8 
9CE3 4F 
9CE4 OC 


3920 
3930 
3940 


RET C 
LD C,A 
INC C 


mÊÊÊèÊÊÊÊËmÊmmmmmmmM 


9DE7 031B2530 5290 TABLE 1: DEFB 3,#1B,#25.#30. 
5300 0,0,0.0.0,0,0 
9DF2 009A 5310 SP.MAX: DEFW DEBUT ' 


9CE5 3AFA9D 


3950 


LD A, (X.DEE) 
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9DF4 3092 5320 SPJlINs DEFW DEBUT-2000 


9CE8 47 


3960 


LD B,A 










9DF6 3192 5330 SP.REM: DEFW DEBUT-2000+1 


9CE9 3AFC9D 


3970 


LD A.U/ÏN) 










9DF8 3092 5340 Sp'vID: DEFW DEEUT-2000 


9CEC 90 


3980 


SUE B 


9D68 


E5 


464C 


PUSH HL 


9DFA 0000 5350 X DEB: DEFW 


9CED D8 


3990 


RET C 


9D69 


CD559D 


4650 SAUT5: 


CALL BUSY3 


9DFC 0000 5360 X.FIN: DEFW 


9CEE 47 


4000 


LD B.A 


9D6C 


38FB 


4660 


JR C.SAUT5 


9DFE 0000 5370 y'dEB: DEFW 


9CEF 04 


4010 


INC B 


9D6E 


2AF69D 


4670 


LD HL, (SP.REM) 


9E00 0000 5380 Y~FIN: DEFW 


9CF0 ED430C9E 


4020 L00P8: 


LD (ADDR).BC 


9D71 


77 


4680 


LD ( HL ! , A 


9E02 0000 5390 X^ DEFW 


9CF4 3AFE9D 


4030 


LD A, iY_DEB) 


9D72 


23 


4690 


INC HL 


9E04 0000 5400 Y: DEFW 


9CF7 CD72BB 


4040 


CALL ROW " 


9D73 


22F69D 


4700 


LD- (SP.SEM.HL 


9E06 00 5410 BYTE: DEFB 


9CFA 3AFA9D 


4050 


LD A. <X_DEB) 


9D76 


ED5BF29D 


4710 


LD DE, (S? MAX) 


9E07 00 5420 SENS: DEF3 








9D7A 


37 


4720 


SCF 


9E0S 06 5430 POINTS: DEFB 6 
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9D7Î. 
9D7C 


3F 
ED52 


4730 
4740 


CCF 

SBC HL,DE 


9E09 00 5440 FLAG: ' DEFB 
9E0A 00 5450 SI ZE X: DEFB 








9D7E 


2006 


4750 


JR NZ. RETURN 


9E0B 00 5460 SIZE.Y: DEFB 


9CFD F5 


4060 L00P4: 


PUSH AF 


9DB0 
9D33 


2AF49D 
22F69D 


4760 
4770 


LD HL. (SPJ1INI 
LD (SP.REM), HL 


9E0C 0000 5470 ADDR: DEFW 

5480 
9EDE 10 5490 COULEU: DEFB X00010000 


9CFE CD6FBB 
9D01 CD60BÎ 


4070 
4080 


CALL COLUMN 
CALL SCREEN 


9D86 
9D87 


El 

Dl 


47B0 RETURN: 
4790 
4800 
4910 


POP HL 
POP DE 
POP BC 
POP AF 


9D04 FE20 
9D06 3002 


4090 
4100 


CP 32 

JR NC.SUITE4 


9D88 
9089 


Cl 
FI 


9E0F 20 5500 DEFB. 7JJ0100000 
9E10 40 5510 DEFB 7.01000000 


9D08 3E20 


4110 


LD A. 32 


9D6A 


C9 


4820 
4830 

4840 VIDE: 
4850 LQ0P9: 
4860 


RET 


9E11 80 5520 DEFE 7.10000000 


9D0A CD059C 


4120 EUITE4 


CALL PRINT 






9E12 01 5530 DEFB 7.00000001 


9D0D FI 
9D0E 3C 
9D0F 10EC 


4130 
4140 
4150 


POP AF 
INC A 
DJNZ L00P4 


9D8B 
9D8D 
9D90 


0608 

2AF69D 

ED5BF89D 


LD B,8 

LD HL.ISP.REM) 

LD DE,(SP.VIO) 


9E13 02 5540 DEFB 7.00000010 
9E14 04 5550 DEFB 7.00000100 
9E15 08 5560 DEFE 7.00001000 
5570 


9DI1 CDA99E 


4160 


CALL CR 


9D94 


37 


4870 


SCF 


9D14 ED4E0C9E 
9D18 OD 
9D19 C8 


4170 
4130 
4190 


LD EC.(ADDR) 
DEC C 
RET Z 


9D95 
9D97 
9D98 


EC52 

CB 

2AFB9D 


4880 
4990 
4900 


SBC HL.DE 

RET Z 

LD HL,(SP_VID) 


9E16 FF 5580 DEFB 7.11111111 
9E17 FF 5590 DEFE «1111111 
9E18 FF 5600 DEFB 7.11111111 


9D1A 3AFE9D 


4200 


LD A, (Y.DEE) 


9D9B 


23 


4910 


INC HL 


9E19 FF 5610 DEFE 7.11111111 


9D1D 3C 


4210 


INC A 


9D9C 


22F89D 


4920 


LD (SP_VID),Hl 


9E1A FF 5620 DEFB 7.11111111 


9D1E 32FE9D 
9D21 18CD 


4220 
4230 
4240 


LD (Y.DEE), A 
JR L0ÔP3 


9D9F 
9DA3 


ED5EF29D 
37 


4930 
4940 


LD DE. (SP.MAX! 
SCF 


9E1E FF 5630 DEFB 7.11111111 
9E1C FF 5640 DEFî. 7.11111111 
9E1D FF 5650 DEFB 7.11111111 






9DA4' 


3F 


4950 


CCF 


5660 

9E1E 5670 DEFS 112 

5680 


9D23 FE03 
9D25 CO 


4250 SPOOLl 
4260 


CP 3 

RET NZ 


9DA5 
9DA7 


ED52 
2813 


4960 
4970 


SBC HL.DE 
JR Z.SUITE2 


9D26 DD6E02 


4270 


LD L.IIX+2) 


9DA9 


2AF89D 


4980 


LD HL,(SP_VID: 


9D29 DD6603 


4280 


LD H.1IX+3) 


9DAC 


7E 


4990 


LD A,(HL) 


9A0Q 5690 ENT DEBUT 


9D2C DD5E04 


4290 


LD E.IIX+4) 


9DAD 


C5 


5000 


PUSH BC 




9D2F DD5605 


4300 


LD D.UX+5) 


9DAE 


CDD39D 


5010 


CALL BUSY1 


Pass 2 errcrs: 00 


9D32 3EA3 


4310 


LD A.KA3 


9DB1 


Cl 


5020 


POP BC 
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9D34 BC 


4320 


CP H 


9DB2 


3312 


5030 


JR C.SUITE3 




9D35 DS 


4330 


RET C 


9DB4 


C5 


5040 


PUSH BC 




9D36 BA 


4340 


CP D 


9DE5 


CDD09D 


5050 


CALL IMPR1 


FLA6 9E09 FRAME BCD7 1MPR BD2E 


9D37 D8 


4350 


RET C 


9DB8 


Cl 


5060 


POP BC 


IMPR1 9DD0 IMPR2 9DD9 IKPR3 9D64 


9D38 E5 


4360 


PUSH HL 


9DB9 


10D2 


5070 


DJNZ L00P9 


INTER 9A7D LIGNE 9AE0 LINK BCD1 


9D39 37 


4370 


SCF 


9DEB 


C9 


5080 


RET 


LCOP 9AF3 L00P1 9B4A L00P2 9BB2 


9D3A ED52 


4390 


SBC HL.DE 


9DBC 


2AF49D 


5090 SUITE2 


LD HL. (SP_MIN) 


L00P3 9BC3 L00P4 9CFD L00P5 9C00 


9D3C El 


4390 


POP HL 


9DBF 


2B 


5100 


DEC HL 


L00P6 9C80 L00P7 9C8C L00P8 9CF0 


9D3D D8 


4400 


RET C 


9DC0 


22F89D 


5110 


LD (SP.VIB).HL 


L00P9 9D8D NMETAB 9A61 OCTET' 9AE6 


9D3E ED53F49D 


4410 


LD (SP_MIN),DE 


9DC3 


C38D9D 


5120 


JP L00P9 


POINTS 9E08 PRINT 9C05 PRINTE 9C37 


9D42 22F29D 


4420 


LD (SP.MAX), HL 


9DC6 


2AF89D 


5130 SUITE3 


LD HL, (SP.VID) 


RETOUR 9BA5 RETURN 9D86 ROW BB72 


9D45 ED53F89D 


4430 


LD (SP.VID).CE 


9DC9 


2B 


5140 


DEC HL 


SAUT 9B37 SAUT1 9B88 SAUT2 9EE5 


9D49 13 


4440 


INC DE 


9DCA 


22FB9D 


5150 


LD (SP.VID), HL 


SAUT3 9E6E SAUT4 9EFB SAUT5 9D69 


9D4A ED53F69D 


4450 


LD (SP.REM), DE 


9DCD 


10BE 


5160 


DJNZ L00F9 


SAUT6 9CAD SAUn 9B50 SCREEN BB60 


9D4E DD7E00 


4460 


LD A, (ÎX+O) 


9DCF 


C9 


5170 


RET 


SENS 9E07 SIZE.X 9E0A SIZE.Y 9E0B 


9D51 328C9D 


4470 


LD !VIDE+t),A 






5180 




SPOOL 9D23 SP.MAX 9DF2 SP.MIN 9DF4 


9D54 C9 


4480 


RET 


9DD0 


CFF237 


5190 IMPR1: 


DEFB #CF.»F2.#97 


SP.REM 9DF6 SP'viD 9DF8 SUITE 9E05 




4490 




9DD3 


CF1E88 


5200 BUSY1: 


DEFB #CF,«1B.#S8 


SUÎTE2 9DBC SUITE3 9DC6 SUITE* 9D0A 


9D55 2AF69D 


4500 EUSY3: 


LD HL.ISP.REM) 






5210 




SUIVAN 9B7B TABLE 9DDC TABLE1 9DE7 


9D53 ED5EF89D 


4510 


LD DE.ISP'viD) 










TEST BBFO TEXT 9CB3 TOURNE 9B0D 


9D5C 37 


4520 


SCF 










VIDE 9D8B WRAP 9B10 X 9E02 


9D5D 3F 


4530 


CCF 










X.DEB 9DFA X.FIN 9DFC Y 9E04 


9D5E ED52 


4540 


SBC HL.DE 
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Y~DO 9DFE Y.FIN 9E00 


9D60 37 


4550 


SCF 












9D61 C8 


4560 


RET Z 










Table used: 1001 froa 1500 


9D62 3F 


4570 


CCF 


9DD6 


C3 


5220 EUSY2 


DEFB #C3 


Exécutes: 39424 
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PME / PMI 





VISMO FAIT PEAU NEUVE 

Afin d'améliorer le service client, M. ZDUNEK 
de la société Vismo de Paris a changé l'agen- 
cement de son magasin. Dans le môme 
temps, le second magasin faisant double 
emploi serait fermé. 

AMSTRAD S'AFFICHE 

Grosse campagne d'affichage chez AMS- 
TRAD FRANCE. 2500 panneaux dans 63 vil- 
les dès le 1 5 octobre. Quelque temps après, 
aux environs du 1 5 novembre, 1 3 villes de 
plus de 300 000 habitants se verront affi- 
chées AMSTRAD. 

Il est regrettable que, dans le même temps, 
quelques revendeurs en mal de trésorerie 
attendent avec impatience d'être livrés de 
leurs machines. 

PUBLICITE 

AMSTRAD FRANCE a lancé également une 
grande campagne avec différents supports : 
cela va de l'Express, Science et Vie à toutes 
les revues informatique grand public. 



CPC S'AFFICHE AUSSI 



Pour ce numéro, la direction des Editions 
SORACOM a décidé de mettre en place une 
campagne d'affichage dans différentes gran- 
des villes de France et sur Paris et banlieue. 

CPC AMSTRAD A L'ECOLE 

Si l'école publique fait appel de gré ou de 
force au T09 de THOMSON, de plus en plus 
d'établissements, particulièrement dans le 
privé, font appel à AMSTRAD. Une manière 
de bien gérer son établissement. Reste à 
savoir si les logiciels éducatifs suivront. 

121 % 

AMSTRAD est devenu le leader incontesté 
du marché des ordinateurs domestiques, fou- 
lant ainsi le créneau solidement détenu par 
Sinclair. 

L'exercice terminé au 30 juin 1985 laisse 
apparaître un bénéfice imposable en hausse 
de 121 %. Cela représente un total de 
20 1 1 5 000 livres. Mais le plus intéressant 
est la hausse des ventes à l'étranger. De 1 1 
millions de livres, elles passent à 73 millions. 
Une belle réussite commerciale au moment 
où MSX sombre... 



MULTIPLAN ET 

MAC PAINT SUR AMSTRAD 

Un Multiplan sur PCW 8256 et 61 28 dispo- 
nible. Voilà une nouvelle intéressante pour les 
utilisateurs. Nous vous présenterons plus en 
détail ce logiciel qui, associé à d'autres, per- 
met d'élargir le champ d'action. Reste à 
savoir si Je Multiplan en question a les mêmes 
possibilités que celui du MAC. 
Comme vous pouvez le constater dans ce 
numéro, nous vous présentons une grande 
première : le petit frère du Mac Paint et..., 
ce n'est qu'un début I 

ACTUALITE 

M. Dominique ROUSSIES d'Angers est le pre- 
mier abonné tiré au sort à recevoir un livre 
de 139 francs. Il y aura un tirage chaque 
mois. 

POLITIQUE DE VENTE NOUVELLE 

De nombreux revendeurs reçurent en octo- 
bre une circulaire de Marion VANNIER, Direc- 
teur Général d'AMSTRAD FRANCE. AMS- 
TRAD FRANCE propose un abonnement nou- 
veautés. Ce système permet de recevoir 5 
exemplaires maximum des softs et périphé- 
riques. Le montant de la commande se situe 
entre 1000 et 2000 francs maximum. 
AMSTRAD propose également un PCW 8256 
en démonstration-vente avec, pour la pre- 
mière fois, une traite au 31/12/85 I 

M. BOUICHET POSE UNE 
QUESTION AUX PROFESSIONNELS 

Possesseur d'un 464, puis d'un 6128, je 
désirerais utiliser le courrier des lecteurs pour 
faire part de quelques réflexions au sujet du 
"graphisme" de ces appareils. 
Je pense, en effet, qu'il est temps de faire 
un sort à ces "Pub" qui vantent les mérites 
et la "définition" de ces appareils. 

— Il est à remarquer que l'écran fait moins 
de 400 points de définition là quoi servent 
les 640 ?). 

— Qu'en mode texte (80 c, mode 2), le texte 
est presque illisible. 

— Qu'en mode 1, on ne peut disposer que 
de 4 couleurs I 

— Qu'en mode 0, si on a bien 16 couleurs, 
les traits sont tellement gros qu'inutilisables 
et les matrices énormes. 

Comment appeler tout cela autrement que la 
"misère des couleurs des AMSTRAD ?" 
(sûrement un record). 

Pourtant, les logiciels de jeux sont manifes- 
tement en Mode 2 et avec les 1 6 couleurs. . . 
Quel artifice, les programmeurs "Pro" 
emploient-ils pour arriver à ce résultat ? 
Je pense qu 'une solution ferait bien des heu- 
reux. 



Qui répondra ? 



S. FAUREZ 
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FACTURATION 





CPC 
464/ 
664 




Florence MELLET 




c 



|e nouveau logiciel de facturation 
■ ressemble, à s'y méprendre, au pre- 
Pmier logiciel de FACTURATION de 

LOGICYS -présenté en septembre dernier 

dans CPC n° 3. 

— Par sa présentation d'abord : pochette à 
rabats en plastique dur de couleur bordeaux, 
notice bâtie sur le même schéma, étiquette 
sur la disquette (face A : programme ; face 
B : fichiers). 

— Par sa structure ensuite : gestions de 
fichiers CLIENTS - ARTICLES AVEC STOCK 

— CONSTANTES, saisie et édition de factu- 
res, inventaire, calcul des réapprovisionne- 
ments, saisie des entrées/sorties de stock, 
clôture et journal des ventes. 

Je pense qu'il n'est pas utile de répéter ici 
les observations faites dans le premier arti- 
cle pour tous les points communs aux deux 
logiciels. Il sera plus simple et plus clair de 
procéder par comparaison entre FACTURA- 
TION (V logiciel) et CAISSE-DETAIL (logi- 
ciel à l'essai aujourd'hui) I 

CAPACITE DES FICHIERS 



Fichier clients 
Fichier articles 
Fichier constantes 



Facturation Caisse-détail 

maxi 499 maxi 100 

maxi 1499 maxi 2500 

taux TVA 3 8 



L'augmentation à 8 taux de TVA dénote le 
souci de contenter les impératifs de toutes 
les professions ou presque. Même chose 
pour le fichier articles. Malheureusement, ces 
améliorations amputent sérieusement la 
capacité du ficher clients. 

GESTION DU FICHIER CONSTANTES 

Hormis les 8 taux de TVA désormais prévus, 
j'ai noté qu'il y avait plus d'espace disponi- 
ble sur les 5 lignes réservées à la raison 
sociale. Par contre, le choix entre "facture" 
ou "avoir" n'existe plus. Reste seulement le 
numéro de facture. 
Apparaissent deux nouvelles zones : 

— Précision : cette zone permet de détermi- 
ner si l'on veut arrondir le prix de vente au 
franc supérieur, aux 1 centimes supérieurs, 
ou ne pas l'arrondir. 

— Texte sur facture : il n'en est pas fait men- 
tion dans la notice, mais deux lignes sont pré- 
vues pour une mention répétitive comme 
"Merci, à bientôt", par exemple. Ces deux 
lignes s'inscrivent au bas de la facture. 

GESTION DU FICHIER CLIENTS 

Bien qu'il ne comporte plus que 100 clients, 



il n'y a pas de différence. Seuls les codes 
représentant et qualité n'existent plus. Les 
clients peuvent également être listés sur 
imprimante par numéro de code. 
NOUVEAU : lorsqu'on veut créer une nou- 
velle fiche client et qu'on ne connaît pas le 
dernier numéro utilisé, le programme donne 
le premier numéro libre à la saisie du code 
9999. 

Le numéro de téléphone est prévu pour la 
nouvelle numérotation à 8 chiffres. 

GESTION DU FICHIER ARTICLES 

Le fichier articles a été modifié pour une 
grande partie. 

LE CODE ARTICLE : de 4 numériques, il passe 
à 8 alphanumériques. Cette nouvelle numé- 
rotation permet le listage des articles par 
famille. 

Ce critère de tri peut intervenir sur une sim- 
ple liste des articles en fichier, sur le calcul 
des réapprovisionnements, sur l'édition d'in- 
ventaires chiffrés ou vierges. 
DESIGNATION : 1 8 alphanumériques. 
PRIX D'ACHAT : il n'est plus saisi directe- 
ment et n'intervient plus dans le calcul du prix 
de vente. Il résulte soit du calcul du prix tarif 
HT moins le taux de remise ou est égal au 
prix tarif HT, soit du prix tarif TTC moins la 
TVA ou du prix tarif TTC moins les taux de 
remise et moins la TVA. 
CODE HT/TTC : pour prix tarif HT ; 1 pour 
prix tarif TTC. 

PRIX TARIF : c'est le prix d'achat HT ou TTC 
avant déduction des remises. 
COEFFICIENT DE VENTE : il intervient sur le 
prix tarif HT en ajoutant la TVA ou seulement 
sur le prix tarif TTC pour le calcul du prix de 
vente. 

TAUX DE REMISE : il prévoit deux remises 
cumulées sur le prix tarif. Intervient dans le 
calcul du prix d'achat. 
CODE TVA : il faut saisir l'un des 8 taux défi- 
nis dans le fichier constantes. 
NOUVEAU : introduire l'incidence de TVA sur 
chaque article lors de la création du fichier 
présente un avantage certain. En effet, il 
n'est plus possible, lors de la saisie des fac- 
tures, de faire des erreurs de TVA puisqu'elle 
est prédéfinie à la création de l'article. 
LES AUTRES PARAMETRES : prix moyen 
pondéré, quantité mini, quantité réappro, 
quantité entrée, quantité sortie sont sans 
changement, excepté : 

— "quantité mini" qui passe de 99,99 à 
999,99 maximum ; 

— "quantité réappro" qui passe de 9999,99 
à 99 999,99 maximum. 

Ce dernier paramètre est utile pour mémori- 



ser en quelque sorte sur l'article en question 
la quantité minimale de réapprovisionnement 
pour un prix d'achat au plus juste (remises 
quantitatives fournisseurs). 
En résumé : les prix d'achat HT et prix de 
vente TTC ne sont pas saisis directement 
mais découlent des calculs suivants : 

— Pour un prix tarif HT : 

PA = Prix Tarif OU PA = Prix Tarif - Remi- 
ses. 

PV = Prix Tarif x Coef. OU PV = Prix Tarif 
+ TVA. 

— Pour un prix tarif TTC : 

PA = Prix Tarif - TVA OU PA = Prix Tarif 

- Remises - TVA. 

PV + Prix Tarif x Coef. OU PV = Prix Tarif. 

GESTION DES FACTURES 

La saisie des factures se fait en relation avec 
les fichiers CLIENTS et ARTICLES. Contrai- 
rement au premier logiciel FACTURATION, 
l'édition sur imprimante se fait après chaque 
saisie de facture. 

Il n'est plus nécessaire de saisir la date à cha- 
que nouvelle facture. On la tappe une fois au 
clavier au commencement du travail ou en 
début de journée, tout de suite après le char- 
gement du programme. 
L'affectation des facteurs à un ou plusieurs 
représentants n'a plus lieu d'être, mais il 
aurait été utile de la prévoir pour les vendeurs. 

SAISIE DES FACTURES 

Le masque de saisie est complètement 
changé. La colonne Taux de TVA a disparu, 
et pour cause, puisque la TVA est un des 
paramètres de l'article. 
La colonne Remise n'existe plus non plus. On 
ne peut donc plus ajouter les remises par ligne 
d'article. Seule subsiste la remise globale en 
pied de facture. 

Pour les clients qui ne sont pas en fichier, le 
code 9999 s'affiche, mais il n'est pas possi- 
ble de saisir nom et adresse. Les clients 
"comptoir" resteront anonymes. 

EDITION DES JOURNAUX DES VENTES 

Il est possible de procéder à des clôtures et 
journaux de ventes intermédiaires tout en 
conservant la clôture et le journal des ven- 
tes de fin de mois. Ceci permet d'obtenir le 
CA d'une journée ou d'une semaine sans être 
obligé de faire des cumuls du mois "à la 
main". 

- JOURNAL PERIODIQUE : 1 ligne par fac- 
ture avec les ventilations HT, TVA, DIVERS, 
PORT et REMISE. 
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— JOURNAL DE FIN DE MOIS : 1 ligne par 
JOURNEE et par MODE DE REGLEMENT, 
avec les mêmes ventilations que le journal 
périodique. 

En fin de journal, et dans les deux cas, les 
totaux sont classés par catégorie : HT, TVA, 
TTC, règlements. 

COPIE DES FICHIERS 

Autre élément nouveau sur ce logiciel. Il 
comprend un programme intégré pour la sau- 
vegarde des fichiers. Ainsi, les copies seront 
facilement tenues à jour, car il n'est plus 
nécessaire de faire appel à un autre logiciel. 

UTILITAIRES ET DIVERS 

Cette option au menu général est aussi nou- 
velle. 
Elle permet : 

— le tri des articles par référence et par 
famille, 

— l'annulation d'une facture sur le journal 
des ventes. 

CONCLUSION 

Ce logiciel fait partie de la série LOGICYS 
"logiciels professionnels sur AMSTRAD". 
Les différentes améliorations que j'ai relevées 
démontrent bien une certaine volonté de 
séduire les PME/PMI. Je constate d'ailleurs, 
et en toute modestie, que nos suggestions 
ont trouvé, pour certaines, une application 
dans ce logiciel ; à savoir : plus de 4 taux de 
TVA, l'édition immédiate des factures, le tri 
des articles, les journaux intermédiaires pour 
les plus importants. 

Malgré tout, je reste sur ma faim. Je pense 
qu'il est trop complet pour une tenue de 
caisse et pas assez performant pour une fac- 
turation. 

Je sais que la place mémoire limite bien des 
élans et contraint aux choix difficiles. 
Ici, la gestion des stocks, telle qu'elle est 
conçue, avec incidence sur le fichier articles, 
prend beaucoup de place mémoire. Une ges- 
tion, réduite au minimum, à savoir unique- 
ment quantitative, permettrait peut-être 
d'augmenter les possibilités du fichier clients, 
avec tri alphabétique ou non, par code pos- 
tal et cumul du CA, TTC ou HT par client, par 
période (mois, trimestre, etc.). Dans ce cas, 
la gestion des stocks chiffrée pourrait faire 
l'objet d'un autre logiciel avec calcul du rou- 
lement des articles, calcul des marges glo- 
bales, etc. 

Mais, ce ne sont que des idées amenées par 

l'itilisation de différents logiciels qui, tous et 

-« ""■' 'inent à un r->omf»nt, malgré 
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Apràs avoir décrit l'interface 
permettant de relier un fond 
de panier, apte à recevoir plu- 
sieurs réalisations, à l'AMS- 
TRAD, nous commençons au- 
jourd'hui la description de la pre- 
mière réalisation à relier au CPC. 
Pour répondre au souhait d'un 
grand nombre de lecteurs, nous 
commencerons par une interface 
permettant de réaliser des liai- 
sons série ; cette interface offrira 
deux connecteurs de sortie, un 
au format correspondant à la 
norme RS 232, l'autre sur 
connecteur DIN compatible avec 
le connecteur Minitel. 
Pour la réalisation de cette inter- 
face, nous avons choisi le circuit 
INTEL 8251 qui est une interface 
programmable de transmission 
série. Ce circuit peut travailler en 
mode synchrone et en mode 




fWaopoWf 



asynchrone. 

Il convertit, sous forme de série, 
les données que lui fournit le 
microprocesseur sous forme 
parallèle. Il peut simultanément 
recevoir des signaux série et les 
transformer en format parallèle 
pour les envoyer au microproces- 
seur. Le 8251 dialogue avec le 
microprocesseur et lui indique 
quand il peut accepter un nou- 
veau caractère à transmettre ou 
quand il a reçu un caractère 
complet pour l'unité centrale. 
Les principaux signaux échangés 
avec le microprocesseur sont : 
RESET : un niveau haut sur cet 
entrée le met en attente d'un mot 
de_commande. 

WR : Un niveau bas sur cette 
entrée provoque une écriture 
dans le 8251 de la part du micro- 
processeur. 

RTJ : Un niveau bas sur cette 
entrée informe le 8251 que le 
microprocesseur lit une donnée 
ou un mot d'état. 
C/U : (control-data) informe le 
8251 que l'octet présenté su r " 
bus de don"' •*<■" ~^ti«n 



sur cette entrée sélectionne le 
8251. 

La figure 1 donne les différentes 
configurations possibles pour ces 
broches. 



Le 8251 possède ensuite un cer- 
tain nombre d'entrées-sorties 
permettant de le connecter à un 
modem ou à un terminal. 
On trouve : 

DRS : (data set ready) C'est une 
entrée qui peut être testée au tra- 
vers du mot d'état. Elle permet de 
vérifier l'état du modem. 
DTR : (data terminal ready) cette 
sortie vers le modem est position- 
née par le bit correspondant dans 
le mot de commande. 
RTS : (request to send) cette sor- 
tie est aussi positionnée par le bit 
correspondant dans le mot de 
commande. 

CTS : (clear to send) cette entrée 
permet au 8251 de fournir les 
données série lorsque le bit TXEN 
du mot de commande a été posi- 
tionné. 

TXRDY : (transmitter ready) cette 
sortie informe le microprocesseur 
que la partie émission du 8251 
est prête à recevoir une donnée. 
TXE : (transmitter empty) cette 
sortie est au niveau haut lorsque 
le 8251 n'a pas de donnée à 
transmettre. 

TXC : (transmitter dock) horloge 
d'émission. En mode synchrone 
elle est égale à la vitesse de trans- 
mission, en mode asynchrone, 
elle est un multiple de la vitesse 
de transmission. 
RXRDV : fre^eiver r^aH 



à la vitesse de transmission en 
mode synchrone et est égale à un 
multiple de cette vitesse en mode 
asynchrone. 

SYNDET : (sync detect) est uti- 
lisé en mode synchrone seule- 
ment. 

Dans notre montage, le 8251 est 
implanté aux adresses FBE4H et 
FBE5H, les données sont en 
FBE4H et les mots de commande 
et d'état en FBE5H. 

PROGRAMMATION DU 8251 

Avant tout opération de transmis- 
sion, le 8251 doit être initialisé 
par un ensemble de mots de 
commande fourni par le micro- 
processeur ; cette initialisation 
doit suivre une opération de 
reset. 

Les mots de commande sont de 
deux types : 

— sélection de mode : elle suit 
impérativement une opération de 
reset, 

— instruction de commande : les 
mots de commande peuvent être 
émis à n'importe quel moment. 

INSTRUCTION DE 
SELECTION DE MODE 

Le 8251 peut être utilisé pour des 
transmissions de type synchrone 
ou asynchrone ; dans un premier 
temps, nous allons nous intéres- 
ser seulement au mode asynch- 
rone. 

Au caractère fourni par le micro- 
processeur, le 8251 rajoutera 
automatiquement un bit start et 
le nombre de bits stop précisé 
lors de la sélection de mode. Il 
insère aussi un bit de parité avant 
les bits de stop et le caractère 
peut alors être émis en mode 
série sur la sortie TXD ; les bits 
sortent sur le flanc descendant de 
TXC à une vitesse égale à 1,1/ 
16,1/64 fois la fréquence TXC, 
comme précisé dans la sélection 
de mode. 

Le format du mot de sélection de 
mode est donné à la figure 2. 

Après l'envoi d'une sélection de 
mode; il est possible d'envoyer 
un mot de commande, son for- 
mat est donné à la figure 3. 







IS2 1 S1 1 a» 1 PEN L2 ï L1 ! «2 I 81 1 
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S2, 


S1 


donne le nombre de bits stop insérés. 
S2 S1 
invalide 

1 1 bit 

1 11/2 bit 
1 1 2 bits 


EP 




donne la génération de parité 1 = paire, = impaire. 


PEI\ 




valide ou non la parité 1 = validée, = invalidée. 


L2, 


L1 


donne la longueur des caractères transmis. 

L2 L1 

5 bits 

1 6 bits 

1 7 bits 
1 1 8 bits 


B2, 


B1 


donne le facteur de multiplication de la vitesse 
de transmission. 
B2 B1 
mode synchrone 

1 1X 

1 16X 
1 1 64X 



Figure 2 



! DSR I SYNDET f FE t Ô£ f PE 1TXI 1 RXRDY ! TXRW 



Les bits DSR, SYNDET, TXE, RXRDY, TXRDY ont la même défi- 
nition que les broches du 8251 de même nom. 



PE 
DE 



FE 



Est le drapeau d'indication d'erreur de parité. 
Est le drapeau d'erreur de recouvrement, un 
caractère n'a pas été lu par le CPU alors qu'un 
nouveau est arrivé. 

Est le drapeau d'erreur de format, un bit de stop 
valide n'a pas été détecté à la fin d'un caractère. 



Figure 3 



Le microprocessuer peut connaî- 
tre à tout instant l'état du 8251 
en venant lire le mot d'état ; le 
format du mot d'état est donné 
à la figure 4. 



ANALYSE DU SCHEMA 

Nous retrouvons le 8251 sur 
lequel arrivent les signaux sui- 
vants venant de l' AMSTRAD : les 
8 bits de données, les signaux 
d'écriture et lecture WR et RD, le 
bit d'adresse AO et le signal de 
chip sélect (CS8251) venant du 
décodeur d'adresse. Le bit AO est 
relié à la broche C/D ; en se repor- 
tant à la figure 1 , nous voyons 
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IDTRJTXEM ! 



Enter hunt mode. Un niveau 1 autorise la recherche 

d'un caractère de synchro. 

Reset interne. Un niveau haut met le 8251 en attente 

d'un mot de commande. 

Request to send, force la broche RTS à zéro. 

Error reset, remise à zéro de toutes les erreurs. 

Send break character 

1 : force TXD à zéro 

: opération normale 

Validation de réception (1 =validée, = invalidée). 

Data terminal ready, un niveau haut force la sortie DTR 

à zéro. 

Validation de transmission (1 = validé, = invalidé). 




Figure 4 



que lorsqu'il sera à 0, le CPU 
échangera des données avec le 
8251. 

Quand il sera à 1 , le CPU échangera 
des commandes ou un mot d'état. 
Sur le 8251 , nous trouvons aussi les 
différents signaux nécessaires à la 
liaison série ; nous utiliserons RXD 
qui est l'entrée des données série, 
TXD qui est la sortie des données 
série et les signaux vus plus haut : 
RTS, CTS, DTR, DSR. Nous travail- 
lerons en mode asynchrone et en 
général avec une vitesse identique à 



l'émission et à la réception, aussi 
nous avons relié RXC et TXC. L'hor- 
loge de transmission nous sera four- 
nie par un timer. Nous avons choisi 
un timer bien connu qui est le 8253 
de INTEL. Ce circuit est alimenté par 
une horloge à 1 MHz obtenue en 
divisant par 4 le 4 MHz du CPC à 
l'aide de deux demis LS 74. Le choix 
d'un timer nous permettra d'avoir 
toutes les fréquences désirées par 
programmation ; nous verrons, lors- 
que nous vous proposerons des 
exemples de programmation, que 



nous ne serons pas sur des multiples 
exacts des vitesses standards de 
transmission, mais l'erreur est faible 
et sera tolérable. Dans le prochain 
numéro, lorsque nous parlerons de la 
programmation de l'interface, nous 
dirons quelques mots des timers. Le 
choix du 8253 nous permet de nous 
réserver deux timers pour d'autres 
applications. 

Le décodeur d'adresses est consti- 
tué d'un 74 LS 1 1 et d'un 74 LS 
1 38, ce qui nous donne la table des 
adresses suivantes : 
OFBEOH compteur 
0FBE1H compteur 1 
0FBE2H compteur 2 
0FBE3H mot de mode du 8253 
0FBE4H données du 8251 
OFBE5H mot de commande et d'état 
du 8251. 

La figure 5 donne le schéma de l'in- 
terface ; dans le prochain numéro, 
vous trouverez le film pour le circuit 
imprimé ainsi que des exemples de 
programmes et une application par- 
ticulière. 



tl-HiQ. 




Co*J*jec t€oK 



Ù>.IKJ. 



TP 



Figure 5 
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Ce programme aurait pu être 
écrit en assembleur sous 
CP/M, il est écrit en TURBO PAS- 
CAL afin de donner un exemple 
simple de programme PASCAL. 
La particularité de ce programme 
est de faire appel aux procédures 
et aux fonctions prédéfinies BIOS 
de TURBO PASCAL. 

Nous l'avons appelé SECDISC 
car il permet de lire n'importe quel 
secteur du disque, d'en modifier 
le contenu et de le réécrire. Le 
secteur de disque considéré n'est 
pas le secteur physique mais le 
secteur au sens enregistrement 



de 1 28 octets sous CP/M ; nous 
aurons donc pour notre utilitaire 
36 secteurs par piste, numérotés 
de à 35 et les numéros de piste 
iront de à 39. Tout ceci du fait 
de l'utilisation des points d'en- 
trées standard du BIOS sous 
CP/M. 

La procédure BIOS utilise deux 
paramètres de type entier : le pre- 
mier donne le numéro de la fonc- 
tion du BIOS désirée, le deuxième 
correspond à ce qui sera chargé 
dans les registres BC avant l'ap- 
pel de la procédure. Nous profi- 
terons de ce programme pour 
ouvrir une parenthèse sur CP/M 



et son BIOS. 

Le système CP/ M est constitué 

de trois modules : 

— le CCP (Consol command pro- 
cess) qui est le module du proces- 
seur de commande console, c'est 
l'interface homme-machine ; 

— le BDOS (Basic disk operating 
System) qui est le système de 
gestion de base des fichiers du 
disque ; 

— le BIOS (Basic input output 
System) qui est le système des 
entrées-sorties de base. 

Le BDOS et le CCP constituent le 
noyau du système et sont four- 
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nis par DIGITAL RESEARCH et 
sont indépendants de l'environ- 
nement. Par contre, le BIOS est 
écrit par le constructeur de 
l' AMSTRAD et contient l'ensem- 
ble des programmes d'entrées- 
sorties (drivers) spécifiques à 
l'AMSTRAD. 

L'accès aux primitives du BDOS 
se fait par un appel à l'adresse 
0005H, le numéro de la primitive 
étant dans le registre C. L'accès 
aux primitives du BIOS se fait par 
un tableau des vecteurs de bran- 
chement situé à la base du BIOS. 
Il suffit de regarder le contenu de 
l'adresse 0001 pour retrouver 
l'adresse du BIOS, et ce contenu 
est l'adresse de BIOS + 3. Pour 
AMSTRAD, le BIOS commence à 
l'adresse ADOOH. Le tableau en 
début du BIOS contient 1 7 vec- 
teurs de branchements dont voici 
les principaux : 

BIOS + 9 : JMP CONIN lecture 
d'un caractère au clavier. 
BIOS + 12: JMP CONOUT envoi 



d'un caractère à l'écran. 
BIOS + 15: JMP LIST envoi d'un 
caractère à l'imprimante. 
BIOS + 24 : JMP HOME position- 
nement sur la piste du disque. 
BIOS + 27 : JMP SELDSK sélec- 
tion d'un disque. 
BIOS = 30 : JMP SETTRK initiali- 
sation du numéro de piste. 
BIOS + 33 : JMP SETSÈC initia- 
lise le numéro du secteur. 
BIOS + 36 : JMP SETDMA initia- 
lise l'adresse du buffer disque. 
BIOS + 39 : JMP READ lecture 
d'un secteur disque. 
BIOS + 42 : JMP WRITE écriture 
d'un secteur. 

L'utilisation de ces primitives se 
fait en TURBO avec la procédure 
BIOS ; les numéros des fonctions 
utilisés dans cet exemple sont : 

8 : sélection du disque. 

9 : sélection de la piste. 

10 : sélection du secteur. 

11 : initialise l'adresse d'un buf- 
fer pour les données. 



12 : lecture du secteur considéré. 

13 : écriture du secteur consi- 
déré. 

Dans ce programme, le contenu 
du secteur est visualisé en hexa- 
décimal et en ASCII. A la ques- 
tion numéro de l'octet à modifier, 
il faut répondre par le numéro en 
décimal, l'octet est alors affiché 
dans la zone commentaire. En 
effet, dans l'exemple, nous utili- 
sons la possibilité de multifenê- 
trage de l'AMSTRAD ; il y a deux 
zones d'affichage, la zone de dia- 
logue et la zone des contenus du 
disque. De nombreuses améliora- 
tions peuvent être apportées à ce 
programme pour le rendre plus 
agréable d'emploi, mais nous 
vous laissons le soin de l'amélio- 
rer pour vous permettre de vous 
familiariser avec le langage Pas- 
cal. 



prograi SECDISCi 

It ce prograiie pertet de lire et de nidifier u 
sous CP/N, le secteur considérer correspond a l' 

(t exeiple d'utilisation: lecture de la piste 2 
et récupération d'un fichier deleter par relise 
descripteur a la place de ESi) 



n secteur de 128 octets 

enregistrent CP/Mf) 

qui est le directory 
de 00 en début du 



etbl:=upcase(elb)lî 
for i:=0 to 15 do 
if elbl=tlil then a: 
endi 
b:=b*l; 

elbll-upcaselelbl); 
for i:-0 to 15 do 
if elbMIil then a: 
cony',-a; 



type 



hexstr=string[4]; 
nhex=string[2l; 




const 

t: array!0..151of char='0123456789ABCDEF' ! 

function hex(nuiber:integer;bytes: integer) :heistr! 
var 

d : integer; 
h : heistr; 
begin hlOl :=chr Ibytestbytesli 

for d:-bytes*bytes do«nto 1 do begin 

hldl:=tUuiber and 131! 

nuiber:-nuiber shr 4; 

end; 

hex:=h; 



end; 



procédure »îndo»(xl,yl|X2,y2; integer); 
begtn 

»ritell26,chrUl-ll,chr 1x2-11, chr(yl-ll,chr(y2-ll)i 
endi 

procédure NindonO; 

begin 

KindoMU, 1,80, 241; 

end; 
var 

fonction: integer; 

par autre: integer; 

buffer: array II. .1281 of byte; 

a, b: integer; 

c:char; 



end; 


e:stringI2i; 


function conv (e: nhexl : integer; 


procédure affichage! 


var 


begin 


i,b, a: integer; 


«indoMll, 1,80,181! 


begin 


clrscr; 


a:=0ib:=0i 


for a:=0 to- 7 do 


if length(e>-2 then 


begin 


begin 


for b:=l to 16 do »rite<hex(bufter[a*16«bl,l),' '); 


b:=l! 


for b:°l to 16 do 
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begin 

H bufferlall6»b]<$20 then «riUC.'l 

ClM if bufferlall6»b]>$7e then .ritel'.'l 

else «ritelchr (buHer [ itl6»b ] ) ) ; 

end; 

«ritelni 

end; 



end; 



bcgin 

c:='L'i 
drscr; 

Hh i le c='L' do 
begin 
Nindoall, 19,80,241! 
clrscrl 

*rite ('disque 0/1 ? ' lireadlnlparaietre); 
fondio»:=8; 

bioslfonction,paraietrel; 
■ritel'nuiero de piste ? 'lireadlnlparaietre)! 
tondion:=9; 

bios(fonction,paraietre); 

«ritel'nuiero de secteur ? 'lireadinlparaietreli 
fonction:=10| 
bioslfondion,para«tre); 
paraietre'.=addrlbuffer[ll); 
lOKtiMi'llj 
biD5lfonction,paraietrel! 
fonction:-12;a:-bios(fonction,paraietreli 
affichage; 
»indo»ll, 19,80,24); 
drscr; 

witel'desirez-vous lodifier ce secteur? '); 
readln Ici ic:=upca5elc) I 
«h île c-'O' do 
begin 

«ritel'nuiero de 1 octet a iodifier'1; 
readln (al; 
«ri te l'ancienne valeur: ' ,hexlbufferlal, 1) , ' nouvelle valeur: 'Il 

readln lei; 

buf terlal:=convlel ; 

affichage; 

nindo«(l, 19,80,24) idrscr; 

wr 1 1 e t 'autre lodif ication: ')i 

readln (cl; 

c:=upcase(di 

end; 
drscr; 
«riteCE: pour écrire ce secteur, Llpaur lire un nouveau, 'Il 
■riteC autre lettre pour fia* 1 S 
readlnld; 
c:=upcaseldi 
if c='E' then 
begin 

fonction:=l3i 
bioslfonction,paraietrel ; 
clrscri 

«rite l'desirez-vous lire un autre secteur '); 
readlnldicl-upcaselci; 
if c='0' then c:«'L'i 
end! 
endl 

»indo«0i 
drscr; 
Ht. 
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Pour trier les données stockées 
dans un fichier, il est néces- 
saire de charger celles-ci en 
mémoire (dans un tableau), d'en 
faire le tri suivant un ou plusieurs 
critères, puis de réenregistrer le 
tableau dans le fichier. 

Il existe plusieurs méthodes de tri 
(par sélection, par échange, 
dichotomique, etc.), leur effica- 
cité reposant sur la longueur et la 
complexité du progamme et sur- 
tout sur le temps d'exécution. 
Les moins efficaces nécessitent 
un temps proportionnel au carré 
du nombre d'éléments à trier 
(N*N), les plus rapides à 
N»log(N). 

Nous allons décrire, dans ce 
numéro, trois méthodes dont 
vous pourrez comparer les perfor- 
mances : 

— le tri par sélection, 

— le tri par dichotomie, 

— le tri par la méthode de Shell- 
Metzner. 

Dans le prochain numéro, nous 
étudierons : 

— le tri par arborescence, 

— le tri rapide (Quick-Sort) 




150 



300 nombre 
d'articles 



D'après les résultats sur les 3 
échantillons de nos exemples, le 
tri par dichotomie dont on dit 
grand bien, n'est pas d'une 
grande efficacité lorsque le fichier 
s'agrandit et il est alors préféra- 
ble de choisir la méthode de 
Shell-Metzner. 



TABLEAU COMPARATIF 



nbre d'articles 


30 


150 


300 


sélection 


3,9 s 


79 


295 


dichotomie 


3,9 s 


55 


194 


Shell-Metzner 


1,7 s 


19,8 


33,8 



TRI PAR SELECTION 

Dans cette méthode, on prend un 
élément de référence. On le 
compare successivement à cha- 
cun de ses suivants. Si l'élément 
de référence est plus petit, c'est 
bon. Sinon, on l'échange avec le 
suivant concerné. 
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Arrivé au dernier suivant, l'élé- 
ment de référence contient le 
plus petit élément du tableau. On 
prend alors son suivant comme 
élément de référence, et ce 
jusqu'au dernier. 



Nous devrons alors décaler tous 
les éléments qui suivent d'une 
position et ranger dans la place 
libérée le nouvel élément. 



,0,0, 


roro, 


i 






N 




N/2 


ioto*; 


i"°ro , i i 


1 



L/4 l/8 L/2 



_L 



El 



Cette méthode, facile à program- 
mer, ne peut être utilisée que 
pour de petits fichiers. 

TRI PAR DICHOTOMIE 

Le principe est le suivant : 
On considère que N éléments 
sont rangés dans l'ordre voulu 
(croissant pour l'exemple). On 
souhaite insérer un nouvel élé- 
ment. 

Pour cela, nous prenons l'élément 
du milieu et nous le comparons 
à l'élément nouveau. Si le nouvel 
élément est plus petit, sa place 
sera dans le sous-ensemble gau- 
che, sinon dans le sous-ensemble 
droit. On recommence l'algo- 
rithme jusqu'à ce que la gamme 
couverte par le sous-ensemble 
corresponde à 1 . Nous connais- 
sons alors la place à laquelle il 
faut ranger le nouvel élément. 



nouvel 
élément 

TRI PAR LA METHODE 
DE SHELL-METZNER 

L'ensemble des données est suc- 
cessivement décomposé en 
sous-ensembles de plus en plus 
petits (divisé par deux à chaque 
itération). Un élément d'un sous- 
ensemble est alors comparé à 
son correspondant du sous- 
ensemble suivant, avec échange, 
s'il y a lieu et, dans ce cas, on 
remonte au sous-ensemble pré- 
cédent pour remise en ordre 
éventuelle et ainsi de suite 
jusqu'au premier sous-ensemble. 
Le travail est terminé lorsque le 
sous-ensemble ne comporte plus 
qu'un élément. 

Par cette méthode, le n e élément 
d'un sous-ensemble est toujours 
inférieur n e élément du sous- 
ensemble suivant. 



N/4 

Pour utiliser cet algorithme pour 
faire un tri, il suffit de ranger les 
deux premiers éléments. On 
insère ensuite chacun des élé- 
ments de la suite en appliquant 
la procédure décrite. 
Cette méthode est évidemment 
plus efficace que la précédente, 
mais elle reste largement insuffi- 
sante lorsque le fichier dépasse 
une centaine d'articles. 

Exemple : 



Départ 

1 " passe • 

2* passe 


31 


25 


17 


38 


56 


16 


22 


30 


' 31 


16 


17 


20 


56 


25 


22 


38 


r i7 




31 




22 




56. 








22 




31 












16 




20 




25 




38 


R. 2* passe 
3' passa 


^17 


i 16 


71 


?0 


31 i 


25 i 


56 i 


38 


16 


17 


20 


22 


25 


31 


38 


56 



Le tri par cette méthode est effi- 
cace et le programme, écrit en 
Basic, prend peu de place. Pour 
un tableau de 300 éléments, la 
méthode de Shell -Metzner est 6 
fois plus rapide que la méthode 
par dichotomie ! 



10 REM TRI PAR SELECTION 

20 REM DU TABLEAU D$ 

30 FOR 1=1 TO M-i 

40 FOR J=I+1 TO M 

50 IF Di(JKD*(I) THEN M*=BfUbîKfJ>= 

*<I,:D*m=AA* 

m NEXT J 

70 NEXT I 

80 RETURN 



^XMXMÎMIMÏMÎMÏMJ 
rMXMÏMÏMÎMÏMÎM» 
^XMXMXMXMÏMÏMÎMJ 

i:mxmim:mmh;h:> 

^XMXHîmîmXmïmî 

rMXMXHÎMlMlHlM» 

•«MXMÏMÎMÎMÏMÎMl 



ffa 



10 REM TRI PAR SHELL-METZNER 

20 REM DU TABLEAU B* 

30 P*M 

40 P=INTîP/2) 

50 IF P<1 THEN RETURN 

60 DEMsFIJWH» 

70 8*DO 

80 G*R+p!lF D$<SX=D*(C) SOTÔ 100 

90 AA*»D$(R)sD$(R)=D$(C)iM(C)=AA$;R»R-P 

ïIF R>0 60T0 80 

100 DFJ»DB+lsIF DEB>FIN THEN GOTO 40 EL 

SE SOTO 70 

110 RETURN 



10 REM TRI PAR DICHOTOMIE 

20 REM DU TABLEAU D* 

30 IF MU) > D»(2) THEN AA*=D*i2):Df(2) 

=WU):D$U)«AA*:fi0T0 40 

40 FOR N*3 TOM 

50 R=O;D4kS=0:Z=D-6:C=l 

E=INT(Z/2) 
«S JMH€*C 

IF WIN) < M(R) THEN D=R:C=-1:60T0 1 




— — — — — -— — — — .... 

90 G=R:C=1 

100 Z*D-6sIF Z>1 THEN SOTÔ «3 

110 IF Oi THEN RsR*l 

120 AA$«D*iN) 

130 FOR 1=* T0 1 STEP -1 

140 IF R=I THEN D*U)»AA$sSôT0 160 

150 D$<I)=B$(M>sNfXT I 

160 NEXT N 

170 RETUSN 



MXMXMXMXMXMX» 
IMXMXMXMXMXMÏ 

HXMXMXMXMXMX» 

IMXMXHXMXHXM] 

£mimxmxmxmi> 

IMXMXMXMXMXMÏ 

47H7u7U7U7n7t 
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RESEAU 



C H 



5 MODE 1 : MEMORY &7FFF 

10 FOR f =32768 TO 32802 

20 RE AD asPOKE* -f , a 

30 NEXT -f 

40 CALL S/8000: PRINT"Entrez CALL &800B:RUN "nom"" 

50 NEW 

100 DATA 33,41,128,6,129,17,29,128,195,239,188,33, 

35, 128, 17,50,0, 1,50,0, 195,233, 188,33,35, 128, 195,23 

6, 188, 205,24, 187, 1 95, 3, 1 87 



MOUVEMENT RALENTI 

par Warren Smith (c) Sémaphore 

Logiciels. 

N'avez-vous jamais souhaité pou- 
voir créer un moment 'de pause 
dans l'exécution d'un programme 
afin d'en analyser le développe- 
ment, les mouvement ou tout sim- 
plement pour aller prendre un café 
si un jeu ne possède pas de pause ? 
MOUVEMENT RALENTI utilise 
une des nombreuses routines 
magiques de la ROM de l'Amstrad 
pour intervenir sur le déroulement 
d'un programme. L'horloge interne 
de l'Amstrad envoie une interrup- 
tion toutes les x/secondes. Le pro- 
gramme proposé ici, utilise des 
routines qui permettent d'intro- 
duire un petit programme en 
assembleur, dans MOUVEMENT 
RALENTI ce programme attend 
que l'on presse une touche. Ces 
routines permettent en outre de 
décider tout les combien d'inter- 
rupts le petit programme sera 
appelé, ici environ toutes les deux 
secondes. 

Les routines utilisées par Ralenti 
sont publiées dans le manuel 
d'exploitation de l'Amstrad. Ces 
routines sont : 



KLINITEVENT: 



KLADDTICKER 



déclare 
RALENTI 
comme étant 
un programme 
d'interruption 

met RALENTI 
sur la liste des 
événements en 
cours, cette 
routine est 

appelée après 
chargement de 
registres par 
CALL & 800B 
dans RALENTI. 



KLDELTICKER: enlève 

RALENTI de la, 
liste d'événe- 
ments, ceci 
veut dire que i 
RALENTI est 
mis en sus- 
pens, cette rou- 
tine est appelée 
après charge- 
ment de regis- 
tres par CALL & 
8017 dans 
RALENTI. 

Lorsque le microprocesseur reçoit 
un interrupt, il arrête le programme 
en cours et exécute les routines se 
trouvant sur la liste d'événements. 
RALENTI qui attend la pression 
d'une touche fait partie de cette 
liste. La fréquence des appels à 
RALENTI peut être modifiée 
comme suit: 

- Une fois le programme tapé et 
sauvé, chargez-le avec LOAD au 
lieu de RUN puis éditez les DATA 
en y changeant les deux valeurs 
50 par deux autres (elles doivent 
rester semblables) entre 25 et 
255. Sauvez et exécutez cette 
version du programme. 



Pour utiliser MOUVEMENT 0^i 
RALENTI, tapez le programme et|tij* 
sauvez-le sur une cassette ou dis- u 
quette avec le nom RALENTI. 1 
Exécutez RUN"RALENTI. 1 . 
Entrez ce que l'écran vous 
demande puis exécutez RUN «nom 
du programme à charger» ENTER. 
Chaque fois que le chargement 
s'arrête, il faut taper sur une tou- 
che pour le relancer. C'est l'effet du 
programme qui se manifeste déjà. 
Dans un programme dont vous 
pouvez interrompre l'exécution, 
(non protégé) vous pouvez enclen- 
cher RALENTI à volonté : 



CALL &800B enclenche le 

RALENTI 

CALL &801 7 annule le RALENTI. 




56 



H 3 ■ U ft 3 Z 3 A 



Il existe, je l'ai rencontré dans 
son antre, au fin fond de la cam- 
pagne genevoise, à La Plaine. 
Un coin de cambrousse perdu 
dans le vignoble tout au fond du 
canton. Un antre de baba-cool, 
tentures, pénombre, vieilles éta- 
gères débordant d'instruments 
bizarres. 

Une mine de baba-cool, cheveux 
qu'il vient tout juste de couper, 
barbe poivre et sel, des shorts et 
des sandales, une vague tunique. 
Aucun doute. Mais ce baba-là est 
de l'espèce des «computer 
freak». Aussi rare dans nos 
contrées qu'elle abonde sur les 
rivages de Californie. 

Qu'est-ce qui a bien pu pousser 
Jean-Pierre Cardinaux sur la 
pente glissante de la micro-infor- 
matique? Lui, écolo de sensibi- 
lité, parfait produit des années 
soixantes et ex-attaché aux affai- 
res aborigènes en Australie. 

C'est une expérience pédagogi- 
que qui va lui inoculer le virus. Il 
est question de tester les capaci- 
tés de l'ordinateur dans le sys- 
tème éducatif. A l'époque, on ne 
parle pas d'initiation obligatoire. 
Pour savoir de quoi il parle, Jean- 
Pierre Cardinaux achète un Spec- 
trum. Rapidement, il y prend 
goût et noue des contacts dans le 
milieu fertile des «computer 
freaks» britaniques et français. Il 
se crée des réseaux d'amitiés, 
une communication nourrie s'ins- 
talle. Bientôt, on s'échange des 
logiciels. Plus exactement, dans 
un premier temps, Jean- Pierre 
adapte en français les petites 
merveilles concoctées par les 
anglophones. 

Il faut bientôt fonder une société. 
Sémaphore Logiciels, pour offi- 
cialiser tout ça. Mais les princi- 
pes restent les mêmes : convivia- 
lité d'abord. La plupart des rap- 
ports se déroulent sur un mode de 
troc et d'amitié. On échange des 
services plus que des sous, ce 
que bien des distributeurs au sens 
commercial «traditionnel» ont eu 
de la peine à comprendre, plus, 
accepter. 

Sémaphore et son fondateur, 
n'ont pas de pareil pour dégotter 
le meilleur rapport qualité/prix. 
Alors pensez que quand l'Ams- 



trad sort ils sont sur les rangs. Le 
QL, un temps courtisé, est rangé 
sur un rayon, et dorénavant, les 
CPC d'AMSTRAD deviennent 
leur cheval de bataille. 
La passion de la micro, qui anime 
Jean- Pierre Cardinaux, le pousse 
à découvrir sans cesse, et a adap- 
ter les logiciels les plus pratiques, 
les accessoires miraculeux, les 
interfaces indispensables. Et 
lorsqu'ils n'existent pas, il les 
invente. Lui ou quelques uns de 
ses copains, ou les jeunes qui 
viennent pianoter sur 
ses micros. 



moindres désirs exprimés par votre 
ordinateur. 

La CAO sur AMSTRAD 

Qu'il s'agisse de crayons optiques, 
de logiciels de CAO (mais oui, tour- 
nant sur AMSTRAD, et étonnant 
de définitions avec ça), de fichiers, 
de graphismes, ou de jeux de 
réflexion, Sémaphore pourrait bien 
avoir de quoi vous brancher... 
Reste que ce n'est 
pas toujOL 






.a\«V Geo*5l 
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Un service expert. 

Lorsque vous achetez votre appa- 
reil dans une boutique, vous trou- 
vez au mieux un vendeur compé- 
tent, au pire un bateleur de super- 
marché qui sait en gros faire la dif- 
férence entre une machine à laver 
et un téléviseur. Mais de là à savoir 
pourquoi votre machine à écrire 
EP44 qui sert d'imprimante ne 
peut, malgré son port RS232, se 
brancher sur le micro de vos rêves, 
équipé lui, d'une sortie parallèle... 
il y a un monde. Et inutile de lui 
demander d'adapter votre logiciel à 
vos besoins particuliers. 
Or, ces combines impossibles, ces 
tours de force de débrouillardise et 
de génie informatique, Jean-Pierre 
Cardinaux en est coutumier. A 
l'aide d'une interface développée 
par un ami anglais, d'une broche 
standard et d'un point de soudure, 
il branchera votre imprimante sur 
l'ordinateur. Alors que tous les 
vendeurs de la place, et même de 
France, n'avaient qu'une réponse à 
la bouche : «changez de matériel». 
Oui, mais le branchement ce n'est 
pas tout. Encore faut-il les faire 
tourner ensemble, mais ici aussi, 
c'est semble-t-il un jeu d'enfant 
d'introduire dans son traitement de 
texte, les instructions ad hoc et 
l'imprimante se conformera aux 



facile de suivre l'évolution du mar- 
ché, ses brusques accélérations, et 
ses changements de machines. A 
chaque fois, il faut reconfigurer les 
programmes. Et le côté folklo de 
l'organisation de Sémaphore se 
paie parfois au niveau des délais... 
mais on garde le sourire. 
Aujourd'hui, l'échange n'est plus à 
sens unique. Non seulement de 
Genève, partent vers la France un 
certains nombre de produits tra- 
duits de la langue de Shaekes- 
peare, mais certains logiciels du 
crû, s'en vont à la conquête de Lon- 
dres. Ceci tout simplement, sans 
tapage. 

Bien utilisés, un simple Spectrum, 
ou un Amstrad peuvent faire des 
choses étonnantes. C'est un des 
drames de l'informatique de 
l'avoir, non pas oublié, mais de 
manquer de Jean-Pierre Cardinaux 
pour montrer la voie. Hormis dans 
certaines régions privilégiées, 
comme la Californie ou la Grande- 
Bretagne. 




<&/ ^\ _ Cahier suisse CPC J 
' c/o Réseau- CH AMSTRAD ; ; 

'**, .— 1 283 La Plaine £X 
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• INITIATION 
A L'ASSEMBLEUR 



rï"? 



Denis BOURQUIN 



Après avoir parlé du rôle de 
l'assembleur, de la syntaxe, 
des pseudo-instructions, nous 
allons nous intéresser aux ins- 
tructions du Z80. Dans le premier 
numéro, nous avons donné une 
description du Z80 ; rappelons 
que les principaux constituants 
d'un microprocesseur sont l'unité 
arithmétique et logique (UAL) qui 
sera chargée d'effectuer les opé- 
rations et les registres qui sont 
des mémoires internes au micro- 
processeur. 

A partir de ces deux blocs, nous 
pourrons déduire déjà deux grou- 
pes d'instructions, les- instruc- 
tions de chargement et de trans- 
fert, et les instructions arithmé- 
tiques et logiques. Nous ajoute- 
rons à cela un groupe d'instruc- 
tions de branchement et de saut, 
un groupe d'instructions pour les 
entrées-sorties, un groupe pour 
les manipulations de blocs de 
données et un groupe pour les 
contrôles du processeur. Dans ce 
numéro, nous ne nous intéresse- 
rons qu'aux instructions de trans- 
fert. L'UAL du Z80 est une unité 
arithmétique qui traite des don- 
nées codées sur 8 bits, donc la 
plupart des registres de ce micro- 
processeur sont des registres 8 
bits. Il peut, malgré tout, manipu- 
ler des données 1 6 bits grâce à 
des registres 16 bits et aussi 
grâce à la possibilité de regrou- 
per par paires ces registres 8 bits. 
Nous allons donc trouver les opé- 
rations de transfert s'effectuant 
sur des données 8 bits et des 



opérations de transfert de don- 
nées 16 bits. 

Le mnémonique du code opéra- 
tion commun à toutes les instruc- 
tions de chargement est : LD. Le 
format d'une instruction de char- 
gement est le suivant : 

LD DESTINATION,SOURCE 

La destination sera un registre du 
Z80, une case mémoire ou une 
valeur immédiate. La source sera 
un registre, une case mémoire ou 
une valeur immédiate. Notons 
que dans une instruction opérant 
entre une source et une destina- 
tion, la destination figure avant la 
source. 

Avant de parler des différents 
types d'adressage rencontrés 
dans les instructions de charge- 
ment, il est peut être bon d'ou- 
vrir une parenthèse sur les 
notions d'adressage. 
Dans notre AMSTRAD, les don- 
nées seront ou dans un registre 
du microprocesseur, ou dans une 
case mémoire. Pour accéder à 
une donnée dans un registre, 
nous appelerons le registre par la 
lettre ou les lettres le représen- 
tant, par exemple : LD B,A trans- 
fère le contenu du registre A dans 
le registre B, c'est ce que l'on 
appelle l'adressage registre. Dans 
ce cas, pour le microprocesseur, 
l'adresse du registre considéré 
est contenue dans le code opé- 
ration. Pour accéder à une don- 
née dans une case mémoire, le 
Z80 de l'AMSTRAD fournit sur le 
bus d'adresse l'adresse de cette 
case. Cette adresse pourra être 



fournie directement dans le pro- 
gramme, elle suit alors le code 
opération, c'est l'adressage 
étendu. En utilisant un assem- 
bleur, nous écrirons, par exem- 
ple : LD (TOTO),A : ce qui provo- 
quera le transfert du contenu du 
registre A dans la case mémoire 
appelée TOTO ; cette case aura 
été au préalable réservée par une 
des pseudo-instructions vues pré- 
cédemment, par exemple avec 
ZEN. 



TOTO: 



ORG 
DB 



1000H 




Dans cette exemple, TOTO est 
une case mémoire qui est un 
octet et a pour adresse 1000H. 
L'adresse d'une case mémoire 
pourra aussi ne pas figurer direc- 
tement dans le programme, mais 
elle pourra être déduite du 
contenu d'un registre (les adres- 
ses sont codées sur 16 bits et 
donc les registres considérées 
pour les adresses seront des 
registres 16 bits), lorsqu'une 
case mémoire est adressée à tra- 
vers un registre, nous avons 
l'adressage indirect par registre ; 
il est possible aussi d'ajouter au 
contenu de certains registres un 
déplacement supplémentaire, 
l'adresse est alors le contenu du 
registre plus ce déplacement qui 
figure derrière le code opération, 
c'est l'adressage indexé. 
Pour les instrucitons de charge- 
ment, nous allons trouver les dif- 
férents types d'adressages sui- 
vants : 
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L'ADRESSAGE IMMEDIAT 

Chaque registre du Z80 peut être 
chargé avec une valeur numéri- 
que. Exemple : LD A, 10 charge 
la valeur 10 dans le registre A. 
LD B,0FEH charge la valeur hexa- 
décimale OFEH dans le registre B. 
L'assembleur codera cette ins- 
truction de la manière suivante : 



code opération valeur immédiate 



1 1 » r octet | 



2» octet 



Voici un exemple de codage tel 
qu'il apparaîtra sur un listing 
après assemblage : 

3E 10 LD A,10H 

06 01 LD B,10 

26 00 LD H,0 

L'ADRESSAGE 
IMMEDIAT ETENDU 

Nous avons vu que les registres 
peuvent être regroupés par deux 
pour former un registre 1 6 bits ; 
cette paire de registres peut être 
chargée avec une valeur immé- 
diate en une seule instruction : 
exemple LD BC,1024. Le regis- 
tre B contiendra les poids forts de 
cette valeur, soit 4, et le registre 
C les 8 bits de poids faibles, soit 
car 1 024 = 400H. Le codage de 
cette instruction est le suivant : 



code 
opération ? artie basse 



partie haute 
valeur immédiate 



1 •' octet 2« octet 



3« octet 



Remarquons que le Z80 stocke 
les données 1 6 bits en inversant 
l'octet de poids faible et l'octet 
de poids fort. 

L'ADRESSAGE 
PAR REGISTRE 

Il est possible de charger un quel- 
conque des registres du Z80 avec 
un autre registre. Exemple : 
LB B,C. Cette instruction trans- 
fère le contenu du registre C dans 
le registre B. Les codes opération 
des instructions de transfert de 
registre à registre tiennent sur un 
octet, sauf pour deux registres 
particuliers du Z80, les registres 
I et R que nous verrons plus tard. 



L'ADRESSAGE ETENDU 

Ce mode d'adressage peut aussi 
être appelé adressage direct. 
Dans ce cas, l'un des opérandes 
est une case mémoire spécifiée 
directement par son adresse, 
l'autre opérande ne peut être que 
le registre A. 

Exemple : LD A,(4000A). Cette 
instruction provoque le charge- 
ment du registre A avec le con- 
tenu de l'octet d'adresse 4000H 
; si, par exemple,- en 4000H, 
nous avons 10 avant l'exécution 
de cette' instruction, après son 
exécution le registre A contiendra 
10. Bien sûr, la case mémoire 
d'adresse 4000H contient tou- 
jours 10 après l'opération. 
Autre exemple : LD (4000H),A. 
Inversement, ici, c'est le contenu 
du registre A qui sera transféré 
dans la case d'adresse 4000H. 
Le codage de cette instruction est 
le suivant : 



code .. . 

opération partle basse P art,e haute 

adresse de la case mémoire 
1 •' octet 2« octet 3" octet 



Exemple de listing : 

32 00 40 LD (4000H),A 

3A 00 40 LD A,(4000H) 



L'ADRESSAGE 
INDIRECT PAR REGISTRE 

Dans ce type d'adressage, une 
paire de registres 16 bits se 
comporte comme pointeur 
d'adresse de la mémoire. 
Exemple : LD A,(HL). Cette ins- 
truction effectue le chargement 
du registre A avec le contenu de 
la case mémoire dont l'adresse 
est dans la paire de registres HL. 
La notation entre parenthèses 
indique que le contenu des regis- 
tres HL doit être utilisé comme 
pointeur sur l'emplacement 
mémoire, il en était de même 
dans l'exemple précédent où 
4000H pointait un emplacement 
mémoire : LD (4000H),A. 
Exemple : 
LD HL,4000 H 
LD A,(HL) 

Ces deux instructions ont pour 
effet de prendre le contenu de la 



case mémoire d'adresse 4000H 
et de le mettre dans le registre A. 
Les paires de registres HL, BC, 
DE peuvent être utilisées pour les 
instructions de chargement utili- 
sant ce mode d'adressage et 
ayant le registre A comme 
deuxième opérande. Lorsque le 
deuxième opérande sera un quel- 
conque des autres registres 8 
bits, seule la paire de registres HL 
peut être utilisée. Ces instruc- 
tions sont codées sur un seul 
octet. 

L'ADRESSAGE INDEXE 

Dans ce type d'adressage, l'un 
des opérandes est une case 
mémoire pointée par le contenu 
d'un des registres 1 6 bits d'index 
auquel il faut ajouter un déplace- 
ment codé dans le troisième octet 
de l'instruction. Les registres 
d'index sont IX et IY. Le dépla- 
cement est un nombre signé en 
arithmétique en complément à 
deux. La notation pour cet opé- 
rande est : (IX + d) ou (IY + d). 
Exemple : LD A,(IX+10). On 
prend le contenu du registre d'in- 
dex IX, on y ajoute le déplace- 
ment 10, le résultat est l'adresse 
de la case mémoire dont le 
contenu sera transféré dans le 
registre A. Ces instructions sont 
codées sur trois octets, deux 
pour le code opération et un pour 
le déplacement. 

Nous venons de voir les opéra- 
tions de chargement s'effectuant 
sur des données 8 bits, nous y 
avons ajouté une opération de 
chargement sur 16 bits d'une 
valeur immédiate pour faciliter la 
compréhension des exemples. 
Voyons maintenant les opéra- 
tions de chargement de données 
16 bits en général. Nous retrou- 
vons les mêmes types d'adres- 
sage. 

L'ADRESSAGE IMMEDIAT 

Les paires de registres BC, DE, 
HL peuvent être chargées avec 
une valeur 1 6 bits ainsi que les 
registres 1 6 bits du Z80 : SP, IX, 
IY. 

Exemple : 
LD HL,4000H 
LD SP,0B800H 
LD IX, 10 
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L'ADRESSAGE ETENDU 

Deux cases mémoires adjacentes 
peuvent être chargées avec une 
valeur 16 bits provenant d'une 
paire de registres ou d'un regis- 
tre 16 bits. 
Exemple : 
LD (4000H),HL 
LD (3000H),IX 

Après l'exécution de la première 
instruction, la case mémoire 
d'adresse 4000H contiendra l'oc- 
tet de poids faible, soit le contenu 



du registre L, et la case mémoire 
d'adresse 4001 H contiendra l'oc- 
tet de poids fort, soit le contenu 
du registre H. 

Inversement, nous pourrons 
charger une paire de registres ou 
un registre 16 bits avec le 
contenu de deux cases mémoires 
adjacentes. 

L'ADRESSAGE REGISTRE 

Seul le registre 1 6 bits SP peut 
être chargé par un autre registre 



1 6 bits qui ne peut être que le IX, 
IY ou la paire HL. 
Exemple : 
LD SP,IX 
LD SP,IY 
LD SP,HL 

Nous ne parlerons pas, dans ce 
numéro, de l'adressage indirect 
par registre pour des données 1 6 
bits, car seul le registre SP sert 
dans ce type d'instruction qui, de 
plus, n'utilise pas le mnémonique 
LD ; nous les verrons lorsque 
nous aborderons la notion de pile. 



kCOMMENT RECOPIER 
vx DU 

LANGAGE 
MACHINE 





L'immense majorité des pos- 
sesseurs d'AMSTRAD ne 
connaît pas le langage machine 
(ou l'assembleur). Or, certains de 
ces programmes publiés sont 
vraiment alléchants ; mais 
comment les entrer au clavier ? 
et sans rien comprendre à cette 
technique ? 



Nous avons donc créé un pro- 
gramme en Basic qui se chargera 
de tout, très rapidement, et en 
vous mettant à l'abri des erreurs. 
Pour résumer, vous lancez notre 
programme Basic, puis vous 
entrez au clavier le contenu 
d'UNE SEULE des colonnes du 
listing en assembleur. Une page 
en assembleur est donc beau- 
coup plus vite "recopiée" au cla- 
vier qu'une page de Basic I... La 
frappe terminée, le programme se 
charge de la syntaxe pour la sau- 
vegarde sur cassette ou dis- 
quette. Répétons encore que 
notre programme n'est pas un 
"Assembleur" mais plutôt un 



Michel ARCHAMBAULT 

"Entreur" de listings, conçu pour 
ceux qui ignorent le langage 
machine, qui continueront à 
l'ignorer, mais qui veulent profi- 
ter de ce genre de programme 
même sans rien y comprendre. 
Toutefois, afin de ne pas "taper 
idiot", il est essentiel de possé- 
der ces quelques notions super- 
ficielles : 

QU'EST-CE UN 
PROGRAMME EN 
LANGAGE MACHINE ? 

C'est une suite continue de nom- 
bres, de à 255, qui ont été 
logés quelque part dans la 
mémoire. Par exemple de 
l'adresse 32901 à l'adresse 
32984 : sa longueur est donc de 
84 octets et son "Adresse 
départ" est 32901. Pour lancer 
ce programme, ce n'est pas RUN, 
mais CALL 32901. OK ? 
Supposons que cette série de 84 
nombres commence par 1 95, 6, 
1 52, etc. Il faudait pour les loger 
en RAM faire : 




POKE 329uï , i yo:KuKb szavz, 
6:POKE 32903,152, etc. Fasti- 
dieux, non ? Rassurez-vous, 
notre programme demande la 
fameuse adresse de départ, puis 
vous n'entrez que les nombres 
(ou valeurs) à "poker" en RAM ; 
il se charge de l'ordre POKE à 
l'adresse à chaque fois augmen- 
tée de 1 . Super facile. Et ce 
jusqu'à la fin du listing. Votre rou- 
tine est en place, même après un 
NEW, elle attend d'être appelée 
par le CALL adresse départ ; tout 
ira alors très vite ; environ 50 fois 
plus rapide que le Basic. 
A quoi correspondent ces nom- 
bres entrés ? Certains sont des 
codes de commande pour le 
microprocesseur Z80 de l'AMS- 
TRAD, très souvent suivis par 
des paramètres qu'il exige (des 
adresses, des nombres ; comme 
pour les fonctions Basic). 

LE LISTING 

EN ASSEMBLEUR 

Celui qui a conçu le programme 



60 



en question n'a pas entré à la 
queue-leu-leu cette suite de 
codes et de paramètres ; ce serait 
trop difficile pour se rappeler le 
numéro de code de chaque fonc- 
tion. Il s'est servi d'un pro- 
gramme utilitaire appelé un 
"Assembleur" où il entre au cla- 
vier le mot (en lettres) qui sont les 
initiales de chaque fonction. 
Exemples : LD, ADD, JP, JR, EX, 
etc., suivis de ses paramètres 
numériques (comme en Basic). 
C'est l'Assembleur qui traduit ces 
"MNEMONIQUES" en leurs 
codes machine respectifs, sur- 
veille la syntaxe et met tout ces 
nombres dans le bon ordre. Mais, 
c'est aussi ce même programme 
Assembleur qui en fait le listing 
sur imprimante, celui-là même qui 
est reproduit photographique- 
ment sur la page de la revue. Et 
c'est là que ça se gâte un peu... 
En effet, chaque Assembleur a 
une présentation de listing qui lui 
est propre, et à nous de nous y 
retrouver. Heureusement, ce 
n'est pas difficile : 

D'abord, sachez que les valeurs 
entrées sont TOUJOURS en 
hexadécimal, et notre série de 
tout à l'heure 195,6,1 52,.. est en 
fait sous la forme C3,06,98,... 
toujours DEUX caractères (pas 
gênant). De gauche à droite, nous 
trouvons généralement les colon- 
nes suivantes : 

1 ) Les adresses mémoire. La plu- 
part du temps en hexadécimal, 
sur deux octets, donc 4 caractè- 
res. Seule la première (départ) 
nous intéresse. 

2) Les valeurs à entrer. C'est la 
nôtre ! Souvent, il y a 1 , 2, 3 ou 
4 octets à la file. Exemple pour 
CD7DBC, il faudra entrer séparé- 
ment CD puis 7D puis BC. On les 
appelle généralement les 
"CODES OBJETS". 

3) Ce qu'a tapé le programmeur, 
des lettres (mnémoniques) et des 
valeurs en hexa, on s'en moque. 

4) Des commentaires (des REM), 
on s'en moque également. 

Voyons maintenant quelques 
variantes de présentation de lis- 
tings. 

— A gauche, on peut trouver une 
numérotation des lignes du lis- 
ting. Sans intérêt. 



— Une "préface" qui définit 
l'adresse départ, l'adresse d'exé- 
cution (généralement, c'est la 
même) et des noms de baptême 
de sub-routines avec leurs adres- 
ses. On s'en moque. 

— Une colonne des adresses tra- 
duites en décimal (en plus de 
l'hexadécimal). C'est rare. 

Votre unique travail est d'identi- 
fier la colonne adresse (en notant 
la première) et la colonne don- 
nées (ou valeurs). C'est tout, 
maintenant, on passe au Basic. 

LE PROGRAMME 
MACHPOKE 

Pourquoi est-il si long pour un 
"POKAGE" aussi simple ? Pour 
éliminer toutes erreurs d'étourde- 
rie lors de la frappe. Elles sont 
faciles et seraient fatales et très 
difficiles à localiser ensuite. La 
moindre erreur provoquera un 
plantage brutal du système, 
après le CALL, et pas de "Syntax 
Error in &982B". De quoi 
disposons-nous ? 

— D'un écran de saisie super 
clair et sans équivoque, 

— de la possibilité de lister à 
l'écran ou sur imprimante ce que 
vous avez déjà entré, pour véri- 
fication, 

— de la possibilité de corriger vos 
erreurs, 

— de la sauvegarde sur cassettte 
ou disquette de votre saisie, 
même si elle n'est pas terminée 
ni vérifiée, 

— du chargement de la saisie 
(LOAD) pour suite ou correction. 

— et enfin, après l'avoir sauve- 
gardé, de pouvoir essayer le pro- 
gramme par CALL. 

Confort + sécurités = fiabilité. 

Il n'y a pas de danger de loger par 
POKE des valeurs erronées en 
mémoire, pourvu que vous ne 
lanciez pas par CALL. Toutefois, 
nous avons prévu le cas où l'em- 
placement de ce programme 
machine dans la mémoire gêne- 
rait le Basic : adresse départ trop 
basse qui viendrait dans le Basic, 
ou adresse finale trop haute qui 
irait écraser les variables utilisées 
par le Basic, ou pire encore, dans 
la zone mémoire de l'écran. D'où 



un deuxième programme baptisé 
MACHDIM. Rassurez-vous, il 
sera vite fait : c'est MACHPOKE 
avec seulement quelques petites 
modifications (voir liste). 

LE PROGRAMME 
MACHDIM 

Identique à MACHPOKE, sauf 
que les valeurs entrées ne sont- 
pas POKEES mais provisoirement 
mises au tableau DIM. Un autre 
tableau DIM recueille, lui, les 
adresses correspondantes. 
La sauvegarde fournit donc un 
"fichier ASCII", rechargeable par 
l'option LOAD. Il y a quand même 
une option CALL pour l'essayer 
(après une prudente sauve- 
garde...). 

Que faire de ce programme 
machine enregistré en ASCII ? Il 
faut le transformer ensuite en 
fichier linéaire, c'est le rôle d'un 
tout petit programme Basic. 

LE PROGRAMME 
POKEDIM 

Il tient très peu de place en 
mémoire. Dans un premier 
temps, il lit le fichier ASCII enre- 
gistré par MACHDIM, et le POKE 
en RAM. Il vous prie de noter par 
écrit son nom, son adresse départ 
et sa longueur. Enfin, il vous pro- 
pose de l'enregistrer en binaire 
sous un autre nom (prudent). 
Vous pouvez alors le tester par 
CALL. 

Ces programmes Basic ne font 
appel à aucune astuce spéciale 
ou fonction peu usitée, que du 
classique. Et comme nous 
publions la légende de nos varia- 
bles, vous devez vous y retrou- 
ver facilement. 

LE MODE D'EMPLOI 

C'est plutôt une présentation, car 
toutes les options figurent à 
l'écran. De plus, toute frappe non 
valable est refusée et signalée par 
un bip sonore, le PRINT CHR$(7). 
Toute première phase : Entrée de 
l'adresse départ, en hexadécimal 
ou en décimal. Vous pouvez, par 
exemple, indifféremment taper 
3891 2 ou &9800. Après le "&", 
pas d'espace et obligatoirement 
quatre caractères. Sitôt après une 
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passe à l'écran de saisie en qua- 
tre WINDOW, très coloré (on 
vous gâte... ). Moitié gauche = 
saisie, moitié droite = les interven- 
tions. 

La partie saisie est en trois colon- 
nes : adressé en décimal, sa tra- 
duction en hexadécimal et les 
valeurs à entrer, le curseur vous 
y attend. Rappelons que c'est le 
programme qui affiche l'adresse 
en cours ; pas vous. Ces trois 
colonnes sont légendées en haut 
de l'écran. 

La partie options est en trois 
zones. En haut, on rappelle la 
fameuse adresse départ. Au 
milieu, les légendes des lettres 
(en majuscules) pour chaque type 
d'intervention, E pour erreur, V 
pour Visionner, S pour Save, etc., 
plus un rappel vous signalant que 
vous êtes dans MACHPOKE ou 



dans MACHDIM. La partie infé- 
rieure pour l'instant est vide, 
c'est la zone réponse aux ques- 
tions, suite aux interventions. 
Exemple : au lieu d'entrer la 
valeur suivante dans le tableau de 
saisie, vous avez tapé E et 
ENTER : dans cette zone appa- 
raît : "Erreur : Adresse en déci- 
mal ?". 

La page de saisie comprend vingt 
lignes (scrolling). De temps à 
autre, vérifiez qu'un oubli n'a pas 
provoqué un décalage adresse- 
valeur. 

Les valeurs sont obligatoirement 
en DEUX caractères hexa (et en 
majuscules) ; ne tapez pas le 
"&", c'est le Basic qui le met. 
Si vous n'entrez qu'un seul carac- 
tère, le programme consulte s'il 

MÉ* C IH F> O K E 



est dans la liste des caractères 
d'interventions. Si ce n'est pas le 
cas, bip sonore et recommencez. 
Il ne peut pas faire une erreur en 
comptant ses adresses, il vérifie 
tout. 

En "vision", il va lister votre sai- 
sie à partir de l'adresse que vous 
lui avez indiquée. Il présente 20 
lignes et s'arrête (pas comme 
LIST en Basic...). La zone ques- 
tion vous présente alors trois 
options : "S" pour Suite, "E" 
pour Erreur décélée, ou "F" pour 
Fin de vision, et retour à la saisie 
ou autre option. 
Les options SAVE et LOAD vous 
demandent le nom du pro- 
gramme. On l'a limité à huit 
caractères maxi, sans espaces ni 
point ; nous sommes alors 
compatibles cassettes et disquet- 
tes. 



10 'MACHPOKE :POKEUR DE PROGRAMME EN LAN 

GAGE MACHINE 

20 * AMSTRAD CPC / Michel Archambaul t 19 

85 

30 OPENOUT "BIDON": MEMORY HIMEM-lsCLOSEO 

UT 

50 MODE l:CLSs BORDER 9 

60 PEN 3tL0CATE 9,4*PRINT "P0KA8E DE PRO 

GRAMMES EN" 

70 LOCATE 11, 6: PRINT "EN LANGAGE MACHINE 

m 

• 

80 PEN 2ILOCATE 8,9sPRINT "Michel Archam 
bault - 1985" 

lOO PEN 2: LOCATE 2,20:PRINT "Si en HEXAD 
ECIMAL faites précéder de 8e" » LOCATE 10,2 
2:PRINT "puis QUATRE caractères." 
110 PEN le LOCATE 8,15: INPUT "ADRESSE DEP 
ART : " . AD* 

120 IF LEFT*< AD*, !)="&" THEN AD=»VAL<"8e"+ 
RIGHT*<AD*,2) >+256*VAL<LEFT*<AD*,3> ) : IF 
LEN(AD*><>5 THEN AD=0:GOTQ 110 
130 IF AD=0 THEN AD-VAL(ADS) 
1000 ' ECRAN DE SAISIE 

1010 WINDOW *0, 1,22, 6, 25i CLS: WINDOW «1,1 
,22,l,4sPAPER #1,1:PEN #1,0: CLS #1 
1020 LOCATE #l,5,2lPRINT # 1," ADRESSE ";SP 
C<4> j "VALEUR" 

1030 LOCATE #1,3,3»PRINT «1 , "deci ";SPC(4 
) ; "hexa" 

1040 WINDOW #2,23,40, 1,18:PAPER #2,2: PEN 
•2,0: CLS #2 

1050 LOCATE #2,2,2:PRINT #2," ADRESSE DE 
PART: " 

1060 LOCATE #2,3,3:PRINT #2,USING "##### 
"jADftPRINT #2,SPC(3);"&"iHEX*(AD) 
1070 PRINT #2,STRIN6*(1B,"_">:PEN#2,3:PR 
INT #2," Valeurs POKEES":PEN#2,0: PRINT 
#2 

1080 PRINT #2," Q « Quitter." 
1090 PRINT #2," E « Erreur." 
1100 PRINT #2," V - Vision." 



1110 PRINT #2," I - Impression." 

1120 PRINT #2," L » LOAD" 

1130 PRINT #2," S - SAVE" 

1140 PRINT #2," C « CALL" 

1150 OPT*="QEVILSC" 

1160 PRINT #2,STRING*U8,"_") 

1170 WINDOW #3,23,40, 18, 40:PAPER #3,2:PE 

N #3,3: CLS #3 

2000 ' SAISIE 

2010 A=AD 

2020 PRINT USING "######"; A: s PRINT SPC<4 

) ; RIGHT* ( "000"+HEX* <A> ,4) s SPC (3) ; 

2025 IF FLOAD THEN LOCATE #3, 2,2«PRINT#3 

, "Passez en Vision" 

2030 K=0:INPUT "",V*:IF V*="" THEN 2090 

2035 IF LEN(V*)>2 THEN PRINT CHR*(7):G0T 

O 2020 

2040 IF LEN(V*)»1 THEN K=INSTR<OPT*,V*) t 

IF K"=0 THEN PRINT CHR* (7): GOTO 2020 

2050 IF K THEN ON K GOTO 3000,4000,5000, 

6000 , 7000 , 8000 , 9000 

2060 IF L£FT*<V*,1)>"F" OR RI6HT*<V*, 1) > 

"F" THEN PRINT CHR* (7): GOTO 2020 

2070 V=VAL<"8t M +V*> 

2080 POKE A,V 

2090 A=A+1:G0T0 2020 

3000 'QUITTER 

3010 CLS #3: LOCATE #3,2,3: INPUT #3, "ON A 

RRETE (0/N) ",Q* 

3020 IF Q*»"0" THEN MODE 1: BORDER 11 CLS: 

END 

3030 IF Q*-"N" THEN 3050 

3040 PRINT CHR*(7) ; : GOTO 3010 

3050 CLS #3: GOTO 2020 

4000 ' ERREUR 

4010 CLS #3: LOCATE #3,6,2»PRINT #3, "ERRE 

UR:" 

4020 LOCATE #3,3,4:PRINT #3, "Adresse DEC 

It" 

4030 LOCATE #3,3,6: INPUT #3, "" ,AE*: AE=VA 

L<AE*):IF AE<AD THEN PRINT CHR* (7) ;: GOTO 
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40918 
4040 PRINT USINB "######"; AE; : PRINT SPC( 
4>ïRieHT*<"000"+HEX*(AE),4):8PC(3)î 
4050 INPUT »",V*ïIF LEN(V*)<>2 THEN PRIN 
T CHR*<7);:BOTO 4040 

4060 IF LEFT*(V*,1)>"F" OR RIBHT*(V*, 1 ) > 
"F" THEN PRINT CHR*<7) ; s GOTO 4040 
4070 V=VAL("*«"+V*) 
4080 POKE AE,V 

4090 IF FVIS THEN FVIS=0:GOTD 5000 
4100 CLS #3: GOTO 2020 
5000 'VISION 

5010 CLS#3:L0CATE #3,3,2! INPUT #3, "VISIO 
N ?<0/N) ",Q*:IF Q*»"N" THEN 5140 
5020 IF Q*<>"0" THEN 5010 

5030 CLS#3:L0CATE #3 ,2,2 : PRINT #3,"Adres 
se DEPART" 

5040 LOCATE #3,2,4: INPUT #3, "en DECI:" ,A 
V*:AV=VAL(AV*) 

5050 IF AV<AO THEN PRINT CHR*(7) ; s GOTO 5 

008 

5060 CLS#3:CLS:F0R I=AV TO AV+19 

5070 PRINT USINB "######"; I; s PRINT SPC<4 

);RIGHT*<"000"+HEX*U> ,4) ; SPC<3> ; RIGHT* ( 

"0"+HEX*(PEEK(I)),2):NEXT:AV»AV+20 

5080 CLS#3s LOCATE #3,2,2: PRINT #3, "Suite 

, Erreur, Fin" 

5085 IF FLOAO THEN PEN #3,08 LOCATE #3,2, 

6:PRINT #3, "Notez 1 adresse": PRINT #3," 

finale en DECI !":PEN #3,3 

5090 LOCATE #3,5,4: INPUT#3," ( S/E/F ) ", 

B* 

5100 IF Q*«"S" THEN 5060 

5110 IF Q*="F" THEN 5140 

5120 IF Q*-"E" THEN FVIS»1:SOTO 4000 

5130 PRINT CHR*(7) ; :GOTO 5080 

5140 IF FLOAD=0 THEN 5200 

5150 CLB#3: LOCATE #3,2,2: PRINT #3,"Adres 

se -finale" 

5160 LOCATE #3,2,4: INPUT #3, "en DECI t", A 

F*:AF=VALCAF*):IF AF<AD THEN 5150 

5170 A«AF+lsFLOAD=0 

5200 CLS#3sCLStB0T0 2020 

6000 ' IMPRESSION 

6010 CLS #3s LOCATE #3, 2, 3: PRINT #3,"IMPR 

ESSIONî" 

6020 INPUT #3," ( 0/N ) ",Q*IIF Q*="N" 
THEN 6070 

6030 IF 0*<>"0" THEN PRINT CHR*(7) s iBOTO 
6000 

6040 PRINT #8,CHR*(27);CHR*(64):F0R I=AD 
TO A-l 

6050 PRINT #8, USINB "###•##": I; : PRINT #8 

," i "iRI6HT*("000"+HEX*U),4)s" - M lRIS 

HT*("0"+HEX*(PEEKU)),2) 

6060 NEXT 

6070 CLS#3:BOTO 2020 

7000 'LOAD 

7010 CLS#3:L0CATE #3,2,2: INPUT #3, "LOAD 

< 0/N )",Q* 

7020 IF G*="N" THEN 7120 

7030 IF Q*<>"0" THEN 7000 

7040 LOCATE #3, 2, 4s INPUT #3, "NOM: ",FICH* 

7050 IF FICH*»"" THEN PRINT CHR*(7);:G0T 

7040 

7060 FICH#»LEFT*(FICH*,8) 

7070 LOAD FICH*,AD:FL0AD=1 

7120 CLS#3:60TO 2020 

8000 'SAVE 



8010 CLS#3: LOCATE #3,2,2: INPUT #3, "SAVE 

( 0/N ) ",Q* 

8020 IF Q*="N" THEN 8090 

8030 IF Q*<>"0" THEN 8000 

8035 IF FLOAD THEN 8100 

8040 LOCATE #3,2,4: INPUT #3, "NOM: " ,FICH* 

8050 IF FICH*="" THEN PRINT CHR*(7>;:60T 

8040 

8060 FICH*=LEFT*(FICH*,8) 

8070 LG=A-AD 

8080 SAVE FICH*,B,AD,LG 

8090 CLS#3:60T0 2020 

8100 CLS#3:L0CATE #3,2,2: PRINT #3,"Adres 

se -finale* 

8110 LOCATE #3,2,4: INPUT #3, "en DECI:", A 

F*:AF«VAL(AF*):IF AF<AD THEN 8110 

B120 A=AF+lsFLOAD«0 

8130 CLS#3:G0T0 8040 

9000 'ESSAI DE CALL 

9010 CLS #3: LOCATE #3,2,4: INPUT #3,"ESSA 

1 CALL (0/N) ",Q* 

9020 IF Q*="N" THEN 9050 

9030 IF Q*0"0" THEN PRINT CHR* <7> ; : GOTO 

9000 
9040 CALL AD 
9050 CLS#3:BOTO 2020 
9060 ' FIN DE LISTING 



MACHDIM 



Modifications de HACHPQKE — > 

l~*L mCHDm sCH AR<3EUR DE PROBRAMME EN LA 

NBA6E MACHINE EN DIM 

40 DEFINT J,K,V:DIM P<3000) ,V(3000) 

50 MODE 1: CLS: BORDER 16 

60 PEN 3: LOCATE 6,4s PRINT "MISE EN DIM D 

E PROBRAMMES EN" 

î^°-o R î NT #2 '. STRINS *U8." , - K >sPEN#2,3 î PR 
1NT #2, Valeurs en DIM" :PEN#2,0: PRINT 

2010 A=AD:J=1 

2080 P(J)=A:V(J)«V 

2090 A=A+l:J=J+l:GOTO 2020 

4080 JE=AE-AD+1:V(0E)=V 

5060 CLS#3:CLS:F0R I=AV TO AV+19: K=I-AD+ 

1 

5070 PRINT USINB "######" ;P(K) ; : PRINT SP 

C<4>;RIGHT*<"000"+HEX*(P<K>> ,4);SPC(3);R 

ISHT*("0"+HEX*(V(K)),2):NEXT:AV=AV+20 

5140 CLS#3:CLSsG0T0 2020 

6040 PRINT #8,CHR*(27);CHR*(64):F0R 1=1 

TO J-l 

6050 PRINT #8, USINB "######" :P(I) ; : PRINT 
#8," : ";RIGHT*("000"+HEX* (PU)), 4);" - 
M ;RIBHT*("0"+HEX*(V(I)),2) 

7070 J=0:OPENIN FICH* 

7080 J=J+1:IF EOF THEN 7100 

7090 INPUT #9,P(J),V(J):B0T0 7080 

7100 CLOSEIN 

7110 A=P(J-1)+1 

8070 OPENOUT FICH* 

8080 FOR I«l TO J-1:WRITE#9,P(I),V(I):NE 

XT:CLOSEOUT 

9040 FOR 1=1 TO J-1:P0KE P(I ) ,V(I) :NEXT: 

CALL AD 

EFFACER dans MACHPOKE les Lignes : 
5085,5150 a 5200,8035,8100 a 8130 
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ADRESSE OALEUR ADRESSE DEPART: 
rteci hexa 409 60 <&AOGO 


4XX37 AOBX XE 
4XX38 AOB2 7F 
4XX39 AOB3 7C 
4XX40 AOB4 4D 


G - du i tter . 
E = Er*ir*eur- . 


4XX4X AOB5 CD 
4XX42 AOB6 EX 
4XX43 AOB7 AO 
4XX44 AOB8 SO 
4XX45 AOB9 59 
4XX46 AOBA 2A 
4XX47 AOBB 09 
4XX48 AOBC AO 
4XX49 AOBD 19 
4XXSO AOBE 22 
4XX5X AOBF OD 
4XX52 AOCO AO 
4XX53 AOCX ED 
4XX54 AOC2 5B 
4XX55 AOC3 OB 
4XX56 A0C4 C 


M = Uision. 

I = Inpression. 

i, — T.,oftr> 







LEGENDE DES VARIABLES: 



A : ADRESSE EN COURS 

AD , AD* : ADRESSE DEPART 

AE , AE* s ADRESSE DE L'ERREUR 

AF , AF* : ADRESSE FINALE 

AV , AV* s ADRESSE DEPART VISION 

CHR*<27);CHR*<64> : VIDE LE BUFFER IMPRIMANTE 

CHR*<7) : BIP SONORE 

DIM P<3000> î LISTE DES ADRESSES 

DIM V(3000) : LISTE DES VALEURS V 

FICH*. 5 NOM DU FICHIER 

FLOAD s FLAG DE LOAD 

FVIS s FLAG DE VISION 

I,J,K : INDICES DE COMPTAGES 

JE : INDICE DE L'ERREUR 

LG : LONGUEUR DU FICHIER 

Q* : REPONSE A UNE QUESTION 

V - V* s VALEUR DU CODE MACHINE 



10 'P0KEDIM:P0KA6E D'UN FICHIER ASCII CREE PAR MAC 

HDIM 

20 'AMSTRAD CPC / M. Archambaul t 1985 

30 OPENOUT "BIDON": MEMORY HIMEM-1:CL0SE0UT 

40 CLS: INPUT"NOM DU FICHIER: ", FICH* 

50 OPENIN FICH*:J=0 

60 J=J+1:IF EOF THEN 90 

70 INPUT#9,A,V:IF J»l THEN AD=A 

80 POKE A, V: GOTO 60 

90 CLOSE IN 

100 L=J-1 

110 PRINT "NOTEZ pour ";FICH*; 

120 PRINT " Adresse DEPART="; AD 

130 PRINT " Longueur="îL 

140 PRINT: INPUT " SAVE en BINAIRE ? (0/N) ",G*:Q*= 

UPPER*<0*> 

150 IF Q*="0" THEN 170 

160 IF Q*<>"N" THEN 140 ELSE END 

170 PRINT: INPUT" NOM DU FICHIER (ou ENTER) :" ,NOM* 

180 IF NOM*="" THEN N0M*=FICH* 

190 SAVE NOM*,B,AD,L:END 

200 ' FIN DU LISTING 



QUELQUES 
CONSEILS DIVERS 

— Ne faites jamais un CALL 
avant d'avoir fait un SAVE (pru- 
dence... ). 

— Vous pouvez faire un SAVE 
sur un programme incomplet, 
vous le rechargerez ensuite par 
LOAD pour le terminer et le cor- 
riger éventuellement. 

— Avec MACHDIM et POKEDIM, 
ne donnez pas le même nom aux 
versions ASCII et binaire. 

— Si un imprévu (par moi) vous 
obligerait à faire un BREAK par la 
touche ESC, rien n'est perdu, 
repartez par GOTO 2020. 

— Les pages listings de CPC n° 
1 , pages 26 et 27, s'adressent au 
CPC 464 en cassette. Si vous 
avez le lecteur de disquettes 
branché, il faut faire BREAK (ou 
option Q = Quitter), puis ITAPE 
avant de faire CALL &9800, 
sinon vous avez le message "Bad 
command". 

— Lisez attentivement le texte de 
l'article accompagnant le lisitng, 
et ce pour deux raisons : 

— il peut y avoir un MEMORY à 
entrer avant de faire LOAD "nom 
du fichier binaire", 

— le CALL peut concerner une 
autre adresse que l'adresse 
départ, c'est ce qu'on appelle 
l'adresse d'exécution ou de lan- 
cement (peu fréquent). 

— Pour enregistrer le fichier 
binaire nommé "TRUC", la 
syntaxe est : 

SAVE"TRUC",B,adresse départ, 
longueur 

Les programmes MACHPOKE et 
POKEDIM se chargent de cette 
écriture. En revanche, LOAD est 
bien plus simple ; à partir de l'al- 
lumage de l'AMSTRAD, tapez 
simplement LOAD"TRUC", et il 
ira se loger au bon endroit, puis 
CALL adresse. C'est pour cela 
qu'il fallait le noter par écrit. 

— En cas de discontinuité dans 
les adresses (rare), tapez ENTER 
en saisie. 

CONCLUSION 

Avec de tels outils et ces quel- 
ques notions, vous devez (enfin) 
profiter des listings ep Assem- 
bleur ; même sans le pratiquer, ni 
le comprendre, il ne vous impres- 
sionnera plus. 
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La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées... De même, comme il est peu 
probable qu'il existe des "généreux dona- 
teurs" de matériels ou de logiciels, les peti- 
tes annonces faisant appel à ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 
Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée. 

Vends pour AMSTRAD CPC 464 nombreux 
logiciels (Sorcery, Combat lynx. Défend or 
Die, etc.) de 10 à 20 F. Ecrire à Jean- 
Christophe BLANC, Résidence de Jaume, 
Lons en Vercors. 

Vends AMSTRAD CPC 464 moniteur 
monochrome vert + assem- 

bleur/désass./monituer + Décathlon + Har- 
rier Attack + Snooker + 3D-lnvaders + (10 
programmes sur cassette) + joystick : 2900 
F. Olivier DUPUIS, 4 rue Robespierre, 78390 
BOIS D'ARCY, tél.: 045.25.19. 

Suite à déménagement j'ai perdu les notices 
de certains de mes logiciels de jeux AMS- 
TRAD. Pouvez vous m'envoyer des photoco- 
pies contre remboursement des frais de Sor- 
cery, Fighter-Plot, Battle for Midway, Knight- 
Core. M. SELLA, 18 rue de la Platrière, 
95220 HERBLAY. 

Cherche pour 664 (ou 464) programmes et 
interfaces our décodage MORSE-RTTY. 
Autres applications radio en réception bien- 
venues ainsi qu'échanges programmes jeux 



et utilitaires, astuces, contacts, listings, etc. 
J. PARSI, 28rueTAine, 75012 PARIS, tél.: 
341.03.37 après 20 h ou 774.20.55 HB. 

Amstradiste échange tous logiciels + cher- 
che TOUTES notices de jeux complètes et 
lisibles (originaux prêtés retournés + photo- 
copies). C. PASQUIER, 29 rue Maxime Gorki, 
78500 SARTROUVILLE. 

Cherche contact hard et soft. Possède plus 
de 200 titres. J'ai déjà réalisé quelques car- 
tes d'extensions. A. ELBAZ, Petite Rue de 
l'Eglise, 67000 STRASBOURG, tél.; (88) 
23.15.77. 

Cherche possesseur d'Amstrad pour échange 
de logiciels. Jérôme TYRANT, La Corderie, 
22200 POMMERIT LE VICOMTE. 

Vends moniteur vidéo N et B 37 cm : 350 
F. Recherche programmes pour ORIC- 
ATMOS. Robert SENECHAL, 30 rue Coutel- 
lier, 60600 CLERMONT OISE, tel : (4) 
450.05.42. 

AMSTRAD CPC 464 possédant bons logi- 
ciels d'arcade, d'aventure, etc. échange pro- 
grammes avec autres Amstradistes. Fabrice 
BERGEAT, L'allée de Corse, 91300 MASSY, 
tél.: (6) 920.53.66. 

Amstrad CPC 464 vend 1 50 logiciels sur K7 
de 30 F à 70 F (le logiciel). Offre uniquement 
sur Paris et banlieue. Philippe LEFEUVRE, 21 
rue du Pont Blanc, 93300 Aubervilliers, tél.: 
352.40.11. Vite, c'est urgent ! (possibilité 
échanges). 

Cherche contacts sur toute la France pour 
échanges de logiciels, trucs et astuces. Cher- 
che également imprimante pouvant se bran- 
cher sur le CPC 464. M. JANVIER, 3 rue Gau- 
guin, 36000 CHATEAUROUX, tél.: (54) 
34.77.89. 



E/R RTTY 45 à 1 1 bds sur CPC 464 et 664 
K7 : 120 F. Eddy DUTERTRE, 6, résid. La 
Pépinière, 92350 LE PLESSIS ROBINSON. 

Vends console vidéo Philips G. 7400 état neuf 
+ extension Basic + 1 2 cassettes de jeux : 
2500 F. Tél.: (88) 01.72.68. 

Chaîne utilisateurs 464 cherche contacts 
pour échanger tous programmes (en possé- 
dons 80 environ). Christian JULLIEN, 3 rue 
Maurice THOREZ, 63100 CLERMONT FER- 
RAND. 

Vends imprimante CGP 1 1 5 40/80 colonnes, 
série et parallèle, 4 couleurs, tbe : 1600 F. 
Echange logiciels (+ de 100) pour CPC sur 
dise ou K7. Cherche notices Devpac, 
Myrddin, Pascal. E. DAURIS, 21 rue de 
l'Aqueduc, 30000 NIMES, tél.: (66) 
29.54.10. 

Amstrad CPC 464 échange logiciels jeux, uti- 
litaires, etc. Thierry AUDIN, 42 rue Bréguet 
75011 PARIS. 

Vends ou échange programmes de jeux, uti- 
litaires, langages (plus de 120 titres) pour 
Amstrad 464. Jean-Pierre PASCALIN, Colon- 
zelle, 26230 GRIGNAN. 

Vends cause double emploi logiciel cassette 
Battle for Midway avec notice en français. 
A. GUILLOTEAU, 91 rue Villiers de liste 
Adam, 75020 PARIS. 

Cassette jeu Amsoft : Les Bijoux de Stradus. 
Pouvez-vous m'aider à passer l'épreuve du 
garde (envoie 1 listing de jeu en échange). 
J.N. REGIS, 17 rue du Chenet, 25230 
DASLE, tél.: (81) 34.45.05. 

Cherche correspondant 464-664 pour échan- 
ger 200 programmes, astuces et utilitaires. 
Ecrire à Robert CROC, 4 impasse Riquet 
31700 BLAGNAC. 
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ANNONCEZ-VOUS ! 

les petites annonces et les messages 



Coupon à renvoyer accompagné de 3 timbres à 2,20 F à : 
SORACOM, 10 Avenue du Général de Gaulle, 35170 BRUZ 
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Petites Annonces 



Echange programmes Amstrad, vends 200 
programmes pour 500 F. Achète imprimante 
de qualité. Tél.: (49) 68.10.69 le soir. 

AMSTRAD 664 échange nombreux program- 
mes sur disque ou cassette. Recherche nou- 
veautés, trucs et astuces, etc. Michel 
POTIER, 42 rue Voltaire, 94190 VILLE- 
NEUVE ST. GEORGES, tél.: 389.62.44. 

Echange K7 jeux, initiation Basic ou envoi 
contre remboursement 50 F les 5 avec 
notice. M. MORA, BP 7, 41410 NOE. 

Cherche possesseurs d'AMSTRAD CPC 464 
pour ventes ou échanges de logiciels (jeux, 
utilitaires, etc.). Envoyer liste pour échanges 
à M. Fabrice MOLINIER, 6 rue Charcot, 
62290 MOEUX LES MINES. 

Echange nombreux programmes pour CPC 
464, réponse assurée. Contacter Christophe 
VALLA, 30 allée des Brasilias, 26500 
BOURG LES VALENCES. 

Vends ordinateur Tl 99 4/A Péritel avec joy- 
sticks, câble mgn, Basic étendu, fixt 32 k, 
mini mém. + modules, Foot, Echecs, Vidéo- 
games 1 , Adventure (avec 3 K7) + K7. Heb- 
dogiciel n° 1 à 4, Lunau Lauder 2, Solar 
System, Lunau Jumper + 1 5 programmes + 
7 revues et livres + 35 numéros d'Hebdogi- 
ciel. Le tout : 4500 F. M. LANCELOT, 3 rue 
des Juifs, 18000 BOURGES, tél.: (48) 
24.03.50 après 20 h. 

Vends pour ZX81,. cause acquisition autre 
matériel, assembleur + désassembleur + 
doc. Microconcept (500 F). Nombreux livres 
sur ZX81 à moitié prix. Tél.: (1) 772.92.18 
(3811 HB. 

Possesseur d'un CPC 464 cherche corres 
pondant pour échanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Boum, 95600 EAUBONNE. Réponse assurée. 

Vends AMSTRAD CPC 464 vert avec joys- 
tick et plus de 80 logiciels : 3200 F. M. Jean- 
Marc LELOUP, tél.: 384.45.24 ou HB au 
233.38.50 ou 233.38.52. 

AMSTRAD 664 vend ou échange un grand 
nombre de logiciels professionnels et de 
|eux ; peut transposer vos logiciels sur dis 
guette gracieusement. Tél.: (40) 97.28.64 

Cherche des |eux AMSTRAD. Serais prêt à 
faire des échanges. En possède une bonne 
trentaine et aimerais m'étendre. Pour cela 
écrire à Franck DELHOMME, 6, bd. Nessel. 
67500 HAGUENAU. Réponse assez urgente. 

Pour CPC 464, contre contribution forfaitaire, 
cherche Lin programme utilitaire pour une 
gestion spécifique administrative avec gra- 
phiques. Appelez, pour précisions et cahier 
des charges : M. PERRET, tél.: (84) 
30.03.55." 

Vends carte APPLE Ile entièrement équipée 
(y compris ROM) testée, clavier, alim. à 
découpage, carte langage nue, le tout : 
3200 F ou séparément. Tél.: M. NOËL (1) 



339.40.55 poste 413 ou 899.26.51 après 
18 h 30. 

Possesseur d'un CPC 464 cherche corres- 
pondant pour échanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Bouin, 95600 EAUBONN. Réponse assurée. 

Echange ou achète programmes pour CPC 
464. Cherche utilitaires intéressants, trucs, 
astuces, bidouilles. Marc FICHEUX, Enval, 
653270 VIC LE COMTE, tél.: (73) 69. 1 7.74. 



Vends listings jeux, K7 jeux pour AMSTRAD 
464. H. BONNIN, Les Erondes, Route des 
Sables, 85300 CHALLANS, tél.: (51) 
68.03.58. 

Cherche pour CPC échange de logiciels 
( + 200). Envoyer vos listes et propositions 
à M. Michel ROBIN, 51 rue André Marteau, 
37700 ST. PIERRE DES CORPS, tél.: (47) 
44.59.60. 

Echange, achète programmes AMSTRAD 
CPC 464, cherche notice en français Battle 
for Midway. J.P. WOJACZEK, 10 allée des 
peupliers, 78390 BOIS D'ARCY. 

Vends 1 2 logiciels jeux neufs cause version 
anglaise pour AMSTRAD. Enveloppe timbrée 
pour liste. Echange manuel AMSTRAD ver- 
sion anglaise contre version française CPC 
464. Sébastien GAROUCHE, 27 rue Frédé- 
ric MISTRAL, 30300 FOURQUES, tél.: (90) 
93.21.74. 

Laurent cherche contacts Amstradiens pour 
échanges divers et logiciels : j'en ai pas mal. 
Laurent LOQUET, 64 rue du 8 Mai, Douvrin, 
62138 HAISNES, tél.: (21) 79.82.34. 

Cher, pour 664, achète, échange : jeux, uti- 
litaires + notices. P. GIORGI, 1 6 av. de Bou- 
vines, 7501 1 PARIS, tél.: 373.86.50 après 
20 h 45. 

Vends imprimante table traçante pour 
CANON X07, 4 couleurs, CANON X710. bon 
état, sous garantie. Faire offre à M. REVEIL- 
LAS, 10 rue Louis Blanc, 24000 PERI- 
GUEUX. 

Vends ou échange nombreux logiciels AMS- 
TRAD 664 ou 464 contre logiciels, bidouil- 
les, utilitaires. M. COTTINEAU, tél.: (40) 
97.23.19. 

Echange logiciels pour AMSTRAD CPC 464 
(K7 et disques). Hervé DELARUE, 26 rue du 
Moulin à Vent, Le Val. St. Père, 50300 
AVRANCHES. 

AMSTRAD CPC 6128 cherche Pascal ISO, 
VC5D, TURBO. C. MOREL, 38 rue de Ker- 
menguy, 29200 BREST, tél.: (98) 47.47.74. 

Echange plus de 80 logiciels sur (cassettes) 
CPC 464 : aventure, utilitaire, jeux... Envoyez 
vite vos listes. Réponses assurées dans les 
plus, bref délais. Laurent GHIO, 25 bis rue 
Noirmoutier, 94450 Limeil-Brévannes, Tél.: 
569.29.46. 



Vends cassettes utilitaires à 1 00 F l'une Tas- 
copy, Easy-Amscalc, Amlettre à 60 F. Cas- 
settes de jeux à 50 F l'une. Flight Pot 737, 
Le millionnaire, Roland in Time, Oh Mummy, 
Hunchback, Tennis. Tél.: (45) 92.86.14 
après 20 h. 

Vends ou échange programmes pour CPC 
464. Cherche bon utilitaire ainsi que jeux. 
S'adresser à Ahmed AMRANE, 92 rue Fran- 
çois Couperin la Gd. Mare, 76000 ROUEN. 

AMSTARD cherche programmes sur disquet- 
tes de toutes sortes et en particulier "Star 
Watcher". Envoyez-moi vos listes. Tony 
POURCHIER, 63, av. E. Allard, 1 301 1 MAR- 
SEILLE. 

Possesseur d'un CPC 464 cherche corres- 
pondant pour échanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Bouin, 95600 EAUBONN. Réponse assurée. 



Echange ou achète programmes pour CPC 
464. Cherche utilitaires intéressants, trucs, 
astuces, bidouilles. Marc FICHEUX, Enval, 
653270 VIC LE COMTE, tél.: (73) 69.1 7.74. 



Vends listings jeux, K7 jeux pour AMSTRAD 
464. H. BONNIN, Les Erondes, Route des 
Sables, 85300 CHALLANS, tél.: (51) 
68.03.58. 

Cause double emploi vends imprimante AMS- 
TRAD DMP-1 état neuf, sous garantie 1 an 
- 20 %. Patrick COMBRISSON, Rue Imbart 
de la Tour, 58000 NEVERS, tél.: (86) 
57.35.31, poste 340 (HB). 

Vends clavier AMSTRAD CPC 464 + 30 
logiciels + doc. : 1 500 F. Régis DARNAULT, 
8 rue de la Croix Ferrée, 78200 MANTES LA 
JOLIE, tél.: 094.14.53. 

Vends AMSTRAD CPC 464 monochrome + 
bte à cass. + 20 log. (Multi-gestion, Ams- 
lettres, Dao, jeux) : 2700 F. Philippe BOUR- 
DAIS, tél.: (43) 28.24.12. 

AMSTRAD CPC 464 : logiciel moniteur simu- 
lateur DX CW : étude progressive et entraî- 
nement code morse, toutes vitesses, tous 
symboles, avec superposition de souffle, 
interférences, brouillages par autre CW, 
fading, etc. Simulant une réception DX. 13 
paramètres à introduire permettant toutes 
configurations. Textes en clair ou codes aléa- 
toires. Tableaux de corrigés en calculateur : 
1 25 F. PICAULT, 1 3450 GRANS, Tél.: (90) 
55.91.65. 

Vends AMSTRAD CPC 464 monochrome + 
50 logiciels (acheté le 05.01.85) : 1800 F. 
Eric BIF, 3, av. Fernand Léger, 91 390 MOR- 
SANG s/Orge, tél.: 904.33.71. 

Vends cause double emploi imprimante 
P2000 Sanco ave câble neuve : 4500 F. P. 
DEROCH, 35 rue de Varsovie, 62640 MON- 
TIGNY EN GOHELLE. 
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la nouvelle superproduction Cobra Soft 

MEURTRES SUR L' ATLANTIQUE 







Apiè.A te Auccli extiaoïd-uia^ie. de "MEURTRE A GRANVE VITESSE" 
tog.Lci.tt qui a éXonné eX àéduiX t_' en&embte. de ta pie&&z ipi- 
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Lu nouveau togixuet éci.U pai Bzitiand SROQARV : 

ATLANTIQUE 
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toile contenant 2 caaeXte& (ptui-ceuià piogiamneA ?X eniesga- 
tiwentà ) , photoA, fiac-àiJKLté de fouinât. ind-uie.6 eX un ai- 
t,oitAjnent_ d'obfeXA d^vejié eX mu6têu.eux ' 
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MEURTRES SUR L'ATLANTIQUE - AUSTRAV 
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27, rue de Leningrad 75008 Paris Tel (1)387 27 27- 
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